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ELEPHANT NEVER FORGETS. 


74' and 8" model, for compatibility with virtually every computer on 
100% error-free and problem-free, and to maintain its quality for at i 
era lifetime of heavy-duty use), 
ion Computer Supplies, Inc., 55 Providence Highway, Norwood, MA 0Z06Z or call toll-free 1-800-34. 
In Massachusetts, call collect (617) 769-8150. Telex 951-6Z4. 



WordPro 3 PIus'/64 

The #1 Selling Word Processor for the Commodore 64'" 


WordPro 3 Plus™/64 and SpellRight Plus™ provide a total word 
processing solution for the Commodore 64™ which gives you: 

* Sophisticated Word Processing 

* Built-in Mail Merging for Form Letters 

* Math Functions for Column Totals 

* Fast and Complete Spell Checking via SpellRight Plus 

* A Super Value (two programs) for Only $99.95! 

WordPro and SpellRight are both specifically designed for the 
novice user with no computer or word processing experience 
whatsoever. And with over 40,000 WordPro versions sold, you 
can be sure that WordPro is a very sophisticated word 
processor loaded with powerful features including: Transfer, 
Insert, Delete, and Rearrange Text, Auto Page Numbering, Math 
Functions, Headers, Footers, Global Search and Replace, the 
Ability to Create Multiple Personalized Letters and Documents, 
and much more. WordPro can create documents of virtually 
any length and will print up to 165 columns wide. You get all of 
this PLUS fast and complete spell checking using SpellRight 
Plus! 


SpellRight Plus locates and highlights misspelled words and 
then allows you to quickly correct the misspellings — 
improving the quality of your letters and reports. 

And, best of all, WordPro and SpellRight’s powerful arsenal 
of features can be put to use almost immediately — by even 
the novice user. So whether you’re a student, professional 
writer, in business, education or a hobbyist, you'll quickly 
become a WordPro Pro! 

Both WordPro and SpellRight Plus are also available separately 
at popular computer outlets nationwide. 

Invest in the best.. WordPro Plus. In a class by Itself. 


Professional Software Inc. 

51 Fremont Street (617) 444-5224 

Needham, MA 02194 Telex: 951579 

Dealer and Distributor inquiries are invited. 






IBM PC Software: the value of choosing 



Size up the selection. 


Yxi’ll find many types of programs in the 
IBM software library. They’ll help keep you on 
your toes in the office, at home or 

There are, in feet, seven 
different categories of IBM pro¬ 
grams called “families.” A family 
of software for business, productivity 
education, entertainment, lifestyle, 
communications or programming. 

Of course, every program in 
every family is tested and approved by 
IBM. And IBM Personal Computer 
Software is made to be compatible 
with IBMPersonal Computer hardware. 


programs that fit. 


Puttingyour 
best foot forward. 


Although every person isn’t on equal footing 
when it comes to using personal computer 
software, there’s something for almost everyone in 
the IBM software library. 

For example, you may be on a shoestring 
budget and want a big selection of programs 
with small price tags. 

"feu may be introducing students to 


:omputing and want programs that are simple to 
nd simple to learn. 

"YEm may run a business requiring 
sophisticated inventory and payroll 
programs. Or you may ran a business 
requiring a single accounting program. 


ite interoffice memos and want a 
;d word processing program. Or you 
may De a novelist looking for a program with 
features worth writing home about. 

Now you can find IBM Personal Computer 
Software that fits—to help you accomplish 
specific tasks and reach individual goals. 


Stroll into a store today. 

What’s the next step? 

Visit an authorized IBM Personal Computer 
dealer or IBM Product Center near you. To find 
out exactly where, call 800-447-4700. In Alaska 
or Hawaii, 800-447-0890. 

Ask your dealer to demonstrate your choice 
of programs. Then get comfortable. Sit down at 
the keyboard and try IBM software on for size. 






Now your Atari computer 
gets down to 
business. 


If you're a serious home 
manager, a student, or run a 
small business at home, now 
you can get sophisticated, inte¬ 
grated software for your ATARI 
computer with the same fea¬ 
tures as the more expensive 
IBM and Apple packages. 

SynCalc 

makes a spreadsheet 
more manageable. 

First, there's SynCalc, the most 
advanced spreadsheet pro¬ 
gram ever created for ATARI 
Home Computers. Not only 
does SynCalc help you get all 
your numbers down easily it 
also comes with a sorting fea¬ 
ture, and the ability to label 
and name your formulas like 
"beginning inventory + goods 
purchased-goods sold = in¬ 
ventory on hand," as well as 
standard entries. And SynCalc 
also comes with "expert" com¬ 
mands, to use once you've be¬ 
come more familiar with its 
procedures. Plus many other 


features found in the more ex¬ 
pensive programs. 

SynFile+ keeps Information 


SynFile+ can function as 
your database, your filing sys¬ 
tem. With SynFile+, you can 
reorganize and sort parts or 
whole files instantly Not only 
can you enter text, you can cal¬ 
culate and update data as 
well. And files from both Syn¬ 
Calc and SynFile+ can also be 
used by the ATARI word proc¬ 
essor, AtariWriter,™ for uses such 
as mail merge. 

SynTrend gives you 
a more graphic way 
to look at data. 

Next; there's SynTrend, which 
can be the graphing and statis¬ 
tical arm of your operation. 
SynTrend allows you to vis¬ 
ualize your data from SynCalc 
or SynFile+ with either bar 
graphs, pie charts, line graphs 
or scatter plots. To do statistical 
analysis, you can quickly calcu¬ 


late means and variances, 
standard deviations, or even 
linear and multiple regres¬ 
sions. It's pretty easy to under¬ 
stand, eh? And also pretty easy 
to operate because all three 
programs come replete with 
easy-to-understand "pop-up" 
menus, to take you through 
their paces step by step. And 
remember, all three programs 
can share data, which helps you 
get the job done even faster. 

So get down to business with 
SynCalc, SynFUe+, SynTrend, 
developed exclusively for 
ATARI by Synapse. And see for 
yourself why the cost of taking 
care of business doesn't have to 
put you out of it. 


K.'MSfiS 
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DISCOVER 
WHAT YOU AND 
ATARI 
CAN DO. 
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EDITORS NOTES 


I was unable to attend this sum¬ 
mer's Consumer Electronics Show, 
and in deference to its impor¬ 
tance, asked Selby Bateman, our 
Features Editor, to contribute a 
guest editorial. 

Robert C. Lock 
Editor In Chief 


The old Chinese curse "May 
you live in interesting times" 
often seems to have been aimed 
directly at our present high- 
tech, microprocessor-based era. 

At least that may have been 
the feeling for many of the 
98,271 attendees who shuffled 
and stared their way through 
June's four-day Consumer Elec¬ 
tronics Show in Chicago. More 
than 50,000 electronics retailers 
and over 2000 members of the 
press were among that number, 
each of them trying to compre¬ 
hend the overwhelming quan¬ 
tity of new products being 
offered to the American and 
world markets. 

Almost 1400 different ex¬ 
hibitors filled 811,000 square 
feet of space, displaying the lat¬ 
est stereo TV receivers, new- 
generation digital audio disc 
players, cellular telephones, 
color televisions that fit in the 
palm of your hand, video¬ 
cassettes, car stereos, and—of 
course—computers, software, 
and hardware peripherals. 

One of the clearest trends 
evident at CES was that com¬ 
puters are becoming linked 
more closely with almost every 
other consumer electronics 
product exhibited. In the not too 
distant future, the fairly clear- 
cut lines between computers, 
stereos, telephones, video sys¬ 


tems, and many other products 
will disappear. This will become 
even more apparent by the be¬ 
ginning of 1985, with the arrival 
in quantity here of new MSX 
operating system micros from 

One example of this trend: 
Atari chairman James Morgan, in 
his efforts to bring his company 
into the future with brighter 
prospects, emphasizes that Atari's 
goal isn't just to produce com¬ 
puters, but to "enhance con¬ 
sumers' lives through interactive 
electronics." That sentiment is 
being echoed in different words 
by many other electronics' man¬ 
ufacturers. They see their prod¬ 
ucts getting "smarter," as 
everything from washing ma¬ 
chines to automobiles begins to 
carry microprocessors. 

Interesting changes in micro¬ 
computer hardware and soft¬ 
ware were everywhere at CES. 
While the great majority of the 
public attempts to understand 
microcomputer developments 
that are essentially several years 
old, the industry charges for¬ 
ward at a gallop. Even for those 
who stay abreast of the latest 
news from the high-tech front 
lines, the power and the pace of 
change in this industry are often 
bewildering. 

How can an individual 
learn about and digest all of the 
innovations, new products, 
changing technologies, and scat¬ 
tered trends that take place in 
the computer and electronics 
field on a daily basis? More im¬ 
portantly, how can those changes 
be understood, wisely inter¬ 
preted, and selectively used? 

Although we're biased on 
the subject, it seems obvious 
that those who have found an 


interest in—sometimes a pas¬ 
sion for—our remarkable com¬ 
puter revolution may be in a 
better position to understand 
and take advantage of what Eric 
Hoffer called the wrenching 
"ordeal of change." 

One model for us is the 
subject of this month's COM¬ 
PUTE! Interview, physicist Ge¬ 
rard O'Neill of Princeton. 
Throughout his career as a 
scientist, writer, lecturer, and 
entrepreneur, O'Neill has con¬ 
sistently blended an ability to 
understand society's changes 
with a clear vision of how 
things can and should work. His 
books and his interests reflect a 
mix of the hard sciences, human 
values, visionary ideas, and 
an unquenchable, optimistic 
curiosity. 

His interests are eclectic— 
from developing colonies in 
space to piloting glider planes to 
researching high-energy physics 
to working with his Apple 11+ 
computer. Perhaps it is O'Neill's 
curiosity and his practical opti¬ 
mism which are fundamental to 
his highly successful approach 
to the whirlwind of technologi¬ 
cal change. Importantly, those 
seem to be characteristics which 
our readers and many of those 
who are intrigued by computing 
appear to have in abundance. 

Is it really a curse or a 
blessing to live in interesting 
times? Samuel Clemens once re¬ 
marked that anyone who has 
held a bull by the tail knows 
five or six things more than 
someone who hasn't. So enjoy 
the mixed blessings of the 
microcomputer revolution, and 
the fact that you know five or 
six things more than you did 





Thanks To CompuServe’s 
CB Simulator, 

“Digital Fox”Accessed“Daia Hari”And 
Proceeded To An “Altared” State. 


The CB Simulator, where 
CompuServe Subscribers can 
Access Friends and Influence 
People on 72 Different 
Channels. 

Just pick your handle and get 
on line. From math to matrimony, 
there’s always someone out there 
who speaks your language. Friends 
from all over the U.S. and Canada are 
at it 24 hours a day. Talking tech or 
just having fun. And if you’ve got a 
secret, just use the CB Scrambler. 


That’ll fool the “lurkers" those CB 
“see it alls” who get their kicks 
by watching. Or you can always use 
the private talk mode for guaranteed 
one-to-one conversation. 

The CB Simulator is just one 
of CompuServe’s many electronic 
communications options that 
include a National Bulletin Board, 
Professional Forums and Electronic 
Mail. Plus, there’s a world of on-line 
information and entertainment all 
for the price of a local phone call 
plus connect time. 


You can access CompuServe 
with almost any computer and 
modem, terminal or communicating 
word processor. 

To receive your illustrated 
guide to the CompuServe Information 
Service and learn how to subscribe, 
call or contact: 

CompuServe 

800 ^ 848 ^ 8199 "° H4322 ° 
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READERS’ FEEDBACK 


“■The EclitoiisCind Reaclers of COMPUTE! 


How Much Commodore 64 Memory? 

I have a Commodore 64. How do I determine 
how much memory a program occupies? I cannot 
find this information in either the 64 User's Man¬ 
ual or the Programmer's Reference Guide. 

Donald E. Lassiter, Jr. 

The amount of BASIC memory available on the 64 
is 38,911 bytes. You will see this message when you 
first turn the 64 on. To determine how much mem¬ 
ory is left free (unused), type and enter: 

PRINT FRE(O)—65536*(FRE(0)<0) 


PRINT FRE(0)+2H6 

To determine how much memory a program is 
using, subtract the value received using the formula 
above from 38911, or type and enter: 

PRINT 38911 - (FREW) - 65536*(FRE(0)<0» 


PRINT 38911 - (FREW) + 2U6) 


Apple Pascal 

I am interested in learning more about Apple's 
Pascal operating system. Is it software that needs 
to be loaded from disk or on a card that needs to 
be installed or what? 

Mirim Lew 

Apple's Pascal operating system is a version of the 
UCSD Pascal system, written at the University of 
California at Sari Diego. It is supplied on disk and 
loaded into RAM, where it is used in place of the 
normal Applesoft ROM. This disk is all that is 
needed on newer Apples (lie's and lie's). Apple II's 
and II+’s don't contain the extra RAM needed to 
hold Pascal and require the Apple Language Card— 
a special 16K memory card which plugs into inter¬ 
face slot zero. 


Atari Checksum Errors 

I have had my Atari computer for a year now, 
but I still have a few unanswered questions you 
might be able to help me with. Sometimes when 
I load a program off my cassette, I get something 
called a "serial bus data frame checksum error." 
What does this mean, and how can I remedy it? 


Also, when I get an error in the middle of the 
loading process, is there any way I can retrieve 
the portion that did load correctly? And is there a 
way to verify Atari SAVEs? 

Jeff McCain 

The "serial bus data frame checksum error" and its 
cousin, "serial data frame overrun," are just Atari's 
way of telling you that the computer encountered a 
tape error. The tape drive is very sensitive to errors 
in timing—if d tape is stretched in the middle, it 
will throw off the bit timing. You can also get this 
error if you didn't allow enough leader when you 
positioned the tape for CLOAD. 

An incomplete program can be a major prob¬ 
lem. Due to the way Atari programs are stored, 
BASIC must know how to find the exact end of a 
program. A partial program is often cut off in the 
middle of a line, and when BASIC scans to find the 
end of the program, it locks up, not finding it. So to 
prevent this problem, a faulty LOAD causes the 
partial program to be NEWed. If you store programs 
with LIST "C:", you can then ENTER "C:" to re¬ 
trieve it. If there is an error, you will still be left 
with a partial program. You can continue with 
ENTER “C:", and you may pick up more and more 
of the listing. 

ENTER can also be used to verify a LISTed 
program. If you ENTER a program that you have 
just LISTed, the program in memory will not be 
lost. If it ENTERS without an error, you've verified 
that the data is stored correctly. Otherwise, you'll 
still be left with the program in memory, so you can 
try again. LIST and ENTER, though, are slower and 
use more tape space than CSAVE and CLOAD. 


Pushing And Pulling The Stack 

When programming in BASIC or machine lan¬ 
guage, how does pushing and pulling things on 
the stack affect the return jump? 

Thomas McCrossin 
The stack is an area of 256 RAM memory bytes that 
is used to hold return addresses for BASIC GOSUBs 
and machine language JSRs. 

When a GOSUB is encountered while running 
a BASIC program, the following happens: 

1. In the simplest terms, the memory address • 
of the next executable statement following the 
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GOSUB is pushed onto the stack. (Specifically, 
it's the address minus one byte.) 

2. The branch to the subroutine is taken, and 
the subroutine is executed. 

3. When the RETURN is encountered in the 
subroutine, the return address information is 
pulled off the stack, program control is re- 

' turned to that point, and processing continues. 
Basically, the same sequence of events is taken 
when using machine language. When a JSR is en¬ 
countered, the return information is pushed onto the 
stack, the branch is taken,-and when the RTS 
(ReTurn from Subroutine) is encountered, the infor¬ 
mation is pulled from the stack, and control is re¬ 
turned to that place in the program. 

When using GOSUBs and JSRs, this stack 
activity is automatically performed by the computer. 

However, you can push and pull stack infor¬ 
mation yourself. This can be done with the use of 
the PHA machine language instruction, which 
pushes the number in the Accumulator onto the 
stack, and PEA, which pulls a byte off the stack and 
places it in the Accumulator. Other stack commands 
available are PHP, which pushes the processor sta¬ 
tus onto the stack, and PEP, which pulls a byte from 
the stack and puts it into the status register. 

Manipulating the stack can be tricky. However, 
if, after jumping to a subroutine, you wish to return 
somewhere else, you can pull the return information 
off the stack (placed there by the operating system), 
and replace it with your data using the PHA 
command. 

The stack can also be used as a temporary stor¬ 
age place for data in machine language program¬ 
ming. Instead of storing information in zero page, or 
some other area, push it onto the stack. When it's 
needed again, pull it back off. But be careful, be¬ 
cause the stack can hold only 256 bytes of infor¬ 
mation. Also if you RTS before PEAing the byte or 
bytes off the stack, the return address will be wrong. 


Tl Programs Vs. Data Files 

I read somewhere that if a TI-99/4A program 
sets up a data file, the data file should be stored 
on a separate disk or cassette from the program. 
Why is that? It seems to me that the logical place 
for the data would be on the same disk or cas¬ 
sette as the program using it. 

Florence Fischer 

Files are not saved or loaded by name on a cassette, 
and the Tl makes no distinction between data and 
program files. As a result, if you place a data file on 
a tape following a program file, you may have diffi¬ 
culty locating the data file (especially if your re¬ 
corder lacks a moderately accurate counter). Also, if 
you place the data file prior to the program file on 


the tape, and later expand your data file, you may 
end up writing over the program file. 

For these reasons, it is wise to keep your pro¬ 
gram and data files on separate cassettes (or on op¬ 
posite sides of a single cassette). No such problems 
exist for disk files since programs are stored by 
name and are labeled as program, data, etc., on the 
disk. 


Slowing Things Down On VIC, 64, Or 
PET/CBM 

I found something very interesting while 
experimenting with my 64. While listing a pro¬ 
gram, I noticed that if you press the CTRL key 
the listing will slow down. Does this work on all 
Commodore computers? Is it supposed to do 
this? 

Mike Merriman 

Yes, it is. Pressing the CTRL key on the Commodore 
64 or the VIC-20 will slow the listings, and some 
BASIC programs. On the older CBM (Commodore 
Business Machines) computers like the 8032, the 
PET, etc., pressing the 1 key will do the same thing. 
This is to allow you to read the listings more easily 
as they scroll by. 

To see how this affects a BASIC program, type, 
enter, and RUN the following program. While it is 
running, press the CTRL key and see what happens: 

10 PRINT"A":GOTO10 


Z80 Atari XL? 

I have an Atari 800 and I am thinking about 
moving on to a more sophisticated system like 
the Atari 1450XLD. I have heard that the 600XL 
and 800XL are much like the older 400/800 
models, but how about the 1400XL and 
1450XLD? Is the BASIC language different? I 
heard it has a Z80 microprocessor. Is all this 
true? 

Alekos Couloumbis 

The 600XL and 800XL computers are very much 
like the 400 and 800. The 600XL and 800XL are al¬ 
most identical, except that the 600XL has 16K while 
the 800XL has 64K. There have been some enhance¬ 
ments to the operating system of the XL computers, 
making it different enough so that some 400/800 
programs will not run on the XL computers. How¬ 
ever, Atari has a Translator disk available through 
its Customer Service that allows you to run 
400/800 programs on your XL computer. The BASIC 
in all XL computers (except the late 1200XL) is 
built-in, and almost identical to the earlier Atari 
BASIC, except that the infamous keyboard lockup 
has been fixed and the exponentiation function has 
been improved. 

The Atari 600XL and 800XL are now in full 
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production. The 1400XL will not be marketed, and 
the future of the 1450XLD is still somewhat 
uncertain. 

The 1450XLD has a bigger keyboard than the 
600XL and 800XL, with extra function keys. It also 
boasts a built-in speech synthesizer and direct- 
connect modem. The 1450XLD has a built-in, double¬ 
sided, double-density, high-speed disk drive. 

The 1450XLD does not have a Z 80 coprocessor. 
At the June 1983 CES, Atari showed a CP/M Z -80 
interface. Then at the January 1984 CES, Atari said 
that they would not market it, but that a third-party 
company might. Rumors continue to swirl around 
the 1450XLD, and Atari may well market a slightly 
different 1450XLD than was shown at recent shows. 


Confusing POKES 

When typing in your programs, I have some¬ 
times come upon statements involving POKEing 
in the PEEK of the same POKE. I would like to 
know how this works. I also don't understand 
POKEing the PEEK while ANDing/ORing an¬ 
other number such as: 

10 POKE 12345, PEEK02345) OR 67 
To add to my confusion would be an IF PEEK 
statement THEN command, that is: 

20 IF PEEKU2345) THEN GOTO 67 


30 IF 9 AND PEEKI12345) THEN GOTO 67 
Can you explain this for me? 

Dwight Weese 

Usually, when you see a POKE and a PEEK to and 
from the same byte, it's done in conjunction with an 
AND or OR command. 

Each byte is composed of eight bits. Each of the 
eight bits is like a light switch: It can be either on 
(1) or off (0). Each of the eight bits has its own value 
(see illustration below). 


bits in the byte are turned on or off according to the 
rules governing AND and OR. The mask can be 
thought of as an imaginary byte with bits set or not 
depending On the mask number. 

The bit pattern of the masking byte follows the 
same rules of binary numbers described above. For 
example, if you're ANDing or ORing with a value 
of 21, the bit pattern of the mask would look like 
00010101 (16+4+1 = 21). 

When you AND a byte, you compare each bit of 
the byte with each bit of the mask. The result will 
be an "on bit" only if both bits (of the byte and the 
mask) are "on" in that position. 

For example, ANDing a byte with a value of 
eleven (00001011) with a three (00000011) would re¬ 
sult in 00000011 (three). This is because the 1 and 2 
bits of both bytes were'Vs, but the 8 bit in the mask 
was a 0. 

ORing a byte compares each bit in the same 
manner as the AND. But when you OR, if the bit in 
either the original or the mask byte is a one, then 
the result is a one ("on"). 

For example, ORing a byte containing a value 
of 15 (00001111) with 240 (11110000) would result 
in 11111111 (255), This is because in all cases of the 
compare, at least one of the bits was a 1. 

In your other examples, IF PEEK (12345) 

THEN GOTO 67 is a standard IF-THEN compare. 
However, in this case there is no comparing ex¬ 
pression as in: IF PEEK (12345) =1 THEN GOTO 
67. When compares are done in this manner, it is a 
special kind of test. In this example, the branch to 
67 would be taken if the PEEKed number is any¬ 
thing other than zero. If the number is a zero, the 
test fails and there will be no GOTO. 

The third example, IF 9 AND PEEK (12345) 
THEN GOTO 67, is the same. In such cases, all 
numbers will answer “yes" to the IF, except zero, 
which will answer "no." The IF 9 AND PEEK(12345.) 
expression will be zero in those cases when the 1 
and 8 bits of location 12345 are both zero. 


Value | 128 | 64 | 32 1 16 1 | 4 | 2 | 1 

Any byte can hold a value from 0 to 255. The value 
of the byte is determined by which bits are on or off, 
and is derived by adding the values of each of the 
on bits. This is called a binary number. For example, 
a byte containing a value of 1 would look like: 

A decimal eleven would look like 00001011 (the 
8 plus 2 plus 1 bits are on, so: 8+2 + 1 = 11), and 
a byte whose value is 255 would be 11111111 
(128+64+32+16+8+4+2+1 = 255). 

When you use the AND and OR commands, it's 
like placing a mask over the eight bits in the byte. 
The mask is, in effect, placed over the byte, and the 


] Rainbows For Atari 

I own an Atari 800 and I am perplexed about 
how to access all the colors in graphics mode 8. 
The only graphics color I can get is white. How 
do you access the other colors? 

Rod MacPherson 

GRAPHICS 8, like GRAPHICS 0, is a two-color 
mode. You can display a character or a pixel in ei¬ 
ther the background color or a different shade (lumi¬ 
nance) of the background color. So the only 
nonbackground color you get in GRAPHICS 8 is 
COLOR 1. Due to the way TV pictures are drawn, 
the tiny pixels can appear in different colors, 
depending on what column they are in (this is often 
called artifacting). You can extend your color options 


































this way, but we can't go into the details here. 
There is plenty of information on artifacting and 
other graphics modes in COMPUTERS First Book 
of Atari Graphics. 


Apple Greetings 

In my experience it seems that for the PR#6 
command to work on the Apple, the greeting 
program that one INITializes the disk with must 
be entitled "HELLO". After RENAMEing the 
greeting program and attempting to boot the 
disk, a FILE NOT FOUND error resulted. 

Jeff Walsh 

Actually, you can assign any filename up to 30 
characters in length to the greeting program (or to 
any other program). Ordinarily, this is done during 
the INITialization process. When IN1T is executed, 
the disk is formatted and the name of the greeting 
program (in addition to being stored in the catalog) 
is placed on the disk in sector 9 of track 1. So when 
the disk is booted, the named greeting program is 
automatically run. 

If you later decide to RENAME your greeting 
program (as you did) or have another program you 
wish to boot, you must also replace the filename for 
the booting program stored in track 1 or a FILE 
NOT FOUND error occurs. The following short pro¬ 
gram lets you replace the filename in track 1 with 
any filename you choose: 

50 FOR I = 1 TO 36: READ J: POKE 3071 + 


100 INPUT "NEW GREETING PROGRAM NAME - 



*,I,l>> + 128 
170 NEXT 

180 POKE 3072 + 22,2: CALL 3072 
190 DATA 169,12,160,10,32,217 

210 DATA 1^0,I,9,32!l2 
220 DATA 0,32,0,0,2,3 
230 DATA 254,96,1,0,0,0 
240 DATA 0,0,0,1,239,216 

After you INPUT your new filename, the pro¬ 
gram writes it to track 1, sector 9. The short ML 
routine in this program enables you to replace the 
filename on the disk. 


Cleaning Commodore Disk Drives 

I own a Commodore 64 and a 1541 disk drive. I 
have cleaned the disk head with two different 
cleaning kits. However, neither kit had instruc¬ 
tions on how to turn on the motor and lower the 
head for the 30-60 seconds that is recommended. 


The best I have been able to do is use LOAD 
"$",8 for the directory many times. Even this 
does not work after a few attempts. 

What is the best command or series of com¬ 
mands to clean the disk drives using these kits? 

Douglas Gwost 

The easiest way to spin the disk drive motor and 
engage the head is with the use of the DOS utility 
commands (SCRATCH, NEW, VERIFY, etc.). 

To clean the disk drive, first remove any 
diskettes that may be in the drive. Follow the 
instructions for the cleaning disk and prepare it for 
use (with cleaning fluid, etc.). Now place the clean¬ 
ing disk into the disk drive, close the door, and 
enter the following commands: 

OPEN 15,8,15 
PRINT #15,"I" 

Entering the PRINT#15,"I" command three or four 
times should spin the disk long enough to fully 
clean the head. After cleaning the drive, enter: 
CLOSE 15 

After cleaning, and before using the disk drive, you 
might want to wait a few minutes. This will allow 
any residual cleaning fluid to dry, and reduce the 
possibility of contaminating a good diskette. 


New Atari Graphics Mode? 

I wrote a program that puzzles me: 

10 GRAPHICS 9016:POKE 710,0 

20 X - INT(RND(0)*318):Y=INT(RND(0)*191) 

30 PLOT 159,95 
40 COLOR Y:DRAWTO X,Y 
50 GOTO 20 

What is graphics mode 9016? When I break in 
and rerun the program, the previous picture is 
not erased! Also, sometimes it would suddenly 
clear the screen. Why? Is there something wrong 
with my computer? 

Gordon E. Gizowski II 
No, your computer is fine. You've just revealed 
some of the peculiarities of BASIC and the operating 
system. First, graphics modes are specified with a 
number from 0 to 15. If you add 16 to the number, 
the split screen will be disabled. If you add 32 to 
the number, the screen will not be cleared when the 
graphics mode is entered. But anything above 
15+16+32 is just chopped off. In binary terms, 
only the lower six bits of the mode number are used. 
So GRAPHICS 71 is the same as GRAPHICS 7+64. 
Since 64 (bit 6) is not used, GRAPHICS 71 is the 
same as GRAPHICS 7. GRAPHICS 9016 is the same 
as 8+32+16+8960. Since 8960 is outside the 
range, it is ignored, and you get 8+32 + 16 (56), 
which is GRAPHICS 8 with no split screen. The 32, 
as mentioned, prevents the screen from being 














cleared when GRAPHICS 8 is set up. A portion of 
the previous picture may have been destroyed, 
though, if you have changed modes (such as from 
GRAPHICS 8 to GRAPHICS 0). 

The reason the screen was sometimes cleared is 
in line 40. You PLOT and DRAWTO random X,Y 
coordinates, but also use the Y coordinate for the 
color number. COLOR also chops off the part of a 
number that is not used. In GRAPHICS 8, only 
COLOR 1 and COLOR 0 are valid, so that odd 
numbers count as COLOR 1, and even numbers 
work as COLOR 0. PLOT is the same as PRINTing 
the CHR$ value of the color at the screen X,Y po¬ 
sition (try using COLOR and PLOT with GRAPH¬ 
ICS 0, 1, and 2 to see the effect). If, however, the 
color number is 125, it is interpreted as CHR$(125), 
which is the same as the code for clear screen 
(CTRL-CLEAR). So COLOR 125:PLOT x,y will clear 
the screen. Your program is interesting, but to get 
the intended effect, you should use a different vari¬ 
able for the color. For example: 

25 C=INT(2*RND(0)). 

40 COLOR ODRAWTO X,Y 


Tl Synthesizer Update 

In the March 1984 issue of COMPUTE!, reader Jim 
Pate suggested using CALL PEEK( —28672,SP) 
on the TI-99/4A to check if the Speech Syn¬ 
thesizer is attached. He said that if it were at¬ 
tached, SP would be 96. This was correct to an 
extent. Because the address —28672 is part of the 
speech read/write buffer, sometimes (like after a 
CALL SPGET or CALL SAY) a value of 96 will 
not be placed into SP. To avoid this problem, in¬ 
stead of: 

IF SP=96 THEN CALL SAYC'UHOH") 
use this: 

IF SP THEN CALL SAYf'UHOH") 

This way, the CALL SAY statement will execute 
as long as SP is not 0. 

Mark Chance 

Thank you for the clarification on this. 


Hidden 64 RAM 

I have been dabbling in machine language a bit, 
and have a question. I would like to know if it is 
possible to load machine language programs into 
the RAM that is underneath BASIC ROM. If it is, 
how do I go about switching out BASIC ROM to 
use the ML routines, and then switching BASIC 
back in? 

Kenneth Cox 

There is 16K (16,384 bytes) of hidden RAM in the 
64. 8K can be found underneath BASIC ROM at 
40960 to 49151, hex $A000-$BFFF, 8192 bytes, and 


8K is under the Kernal at 57344 to 65535, hex 
$EOOO-$FFFF. 

Switching either BASIC or Kernal ROM in or 
out to expose the available RAM underneath is done 
via memory location 1 Normally, there's a 55 in 
that location. Setting bit 0 here to a zero will switch 
out BASIC and expose the 8K block of RAM under¬ 
neath. Setting bit 1 of memory location one to a 0 
will switch out both BASIC and Kernal ROM, 
exposing a total of 16K of RAM. 

Use this BASIC line to switch out BASIC ROM: 

POKE 1,PEEK(1)AND254 

To switch out both BASIC and the Kernal, use: 

POKE 1,PEEK(1)AND253 

When memory location 1 is set at its normal value 
of 55 (BASIC and Kernal ROM switched in), 
POKEing and PEEKing to this memory follows spe¬ 
cial rules. When you PEEK this memory, you will 
get the values of the BASIC or Kernal ROM, that is, 
PEEK (40960). However, POKEing this memory 
(POKE 40960,255) will automatically POKE the 
RAM underneath. 

This makes placing programs into the hidden 
RAM easy. You can POKE in your machine lan¬ 
guage routines via a BASIC poker program, or 
simply load the programs from tape or disk. 


File Structure On Atari 

I have an Atari 800 and am trying to write a 
BASIC program to access records in a file. If I 
open a file with a 9 to append the file, it will use 
the entire sector to store the data. If I open the 
file with a 12, I can write to the entire sector, but 
eventually I will come up with an EOF (End Of 
File) error. Is there any way to get around this 
problem? Also, are there any good books (be¬ 
sides the DOS manual) on file and record struc¬ 
ture for the Atari disk? 

Charles Bentivegna 

The OPEN command has four parameters: 

OPEN IOCB#,access,aux,"filename" 

IOCB# is a number from 1 to 7. There are eight 
Input/Output Control Blocks on the Atari. Each 
IOCB keeps track of an individual file. IOCB #0 is 
reserved for use by the screen editor (INPUT and 
PRINT). IOCB #7 is used for LPR1NT, CSAVE, 

SAVE, LOAD, and CLOAD. When you OPEN a file 
to a particular IOCB, you use the same number 
when accessing the file with PRINTMOCB; data or 
INPUTMOCB, variable. 

The second parameter, access, is either 4 
(OPEN for read), 8 (OPEN for write), 12 (OPEN for 
read and write), or 9 (OPEN to append). The aux 
byte is usually just 0. Access numbers 4 and 8 are 
straightforward. OPEN for read lets you GET or IN¬ 
PUT from that file, but not PRINT or PUT to it. 










Access number 8 lets you create a file, or send data 
out to a device like a printer with PUT and PRINT. 
With a disk drive, using access number 8 will either 
create a new file or replace a previous one. Access 
number 12 lets you read and write to an existing 
file. 

It's a little strange. You can keep reading the 
file until you get to the place you want to change, 
then start writing. Once you start writing, however, 
you can no longer read, since you have started to 
replace a portion of the file. With access number 9, 
you can only write to the end of a file. To keep 
things simple, the data you append to an existing 
file starts on a new sector, rather than filling up the 
remainder of the last sector used by the file. If you 
add short items to files with access number 9, you 
can waste a lot of disk space over the long run. 

The only way you can both read and write in¬ 
dependently of the disk is to use random access 
files. With NOTE, you can store the relative sector 
number of each black as you write the file to the 
disk. You can then refer to the information you 
stored with NOTE, and use POINT to jump directly 
to any sector in that file. You can write a single 
sector (record) independently of the rest of the file, 
and instantly skip to any sector without having to 
sequentially read through all the previous data. We 
cannot go into detail on the use of NOTE and 
POINT here, but the DOS 2.0S Manual has most 
of the information you need. Another source for de¬ 
tails on the working of DOS is Bill Wilkinson's In¬ 
side Atari DOS, available from COMPUTE! Books. 


Machine Language Decimal Mode 

Can anyone explain the SED command? I used 
the SYS command to go to a machine language 
subroutine with the intent of returning to BASIC. 
The program ran fine until it hit the last state¬ 
ment—which was the RTS—and then it crashed 
and displayed an OVERFLOW ERROR message. 

The machine language subroutine contained 
several JSR commands, and each one was cov¬ 
ered with the RTS. The SED command was used 
before an addition. When the SED was deleted, 
everything worked fine. What did (and does) 
SED do? 

E. H. Giles 

When programming in machine language, SED 
stands for set decimal mode. This command sets 
the decimal flag on the status register and tells the 
6502 chip that all addition and subtraction is to be 
done in "decimal mode" (as opposed to “binary"). 

In this mode, the carry flag is set when addition 
exceeds 99. 

Setting the processor to the decimal mode has 
its drawbacks. For example, all additions and 
subtractions are then done in decimal, but the INC 


(increment) command still uses the binary mode. 

Failing to clear the decimal flag (CLD) before 
returning to BASIC could cause catastrophic results. 
This is the reason your computer is freezing up 
when you exit your machine language subroutine. 
Try using the CLD (clear decimal) after the addition 
and before the RTS. 

You always need a CLC before an addition, but 
SED is useful only in highly specialized applica¬ 
tions. See Jim Butterfield's column "Machine Lan¬ 
guage" elsewhere in this issue for more on this 


Atari Disk And DOS 

I own an Atari 800 and a Rana 1000 disk drive. 
Recently I purchased a game disk. I loaded in 
DOS, and typed A for a disk directory. All that 
was printed was how many sectors left. Is there 
any way to print the names of the files? 

T. C. Birgler 

At the lowest level of disk access, there are no 
filenames or directories. Data is stored in 128-byte 
blocks called sectors. A single-density Atari disk is 
divided into 720 of these sectors. DOS is a control 
program that makes this level of the disk invisible 
to you, and lets you create named files which can be 
accessed through a directory. 

Most game disks don't need DOS, since there is 
no need for reading or creating named files. These 
boot disks load directly from the sectors into your 
computer memory without needing to load DOS. 
(DOS itself starts to load directly from a boot sec¬ 
tor.) Since there are no named files, and no directory 
on most game disks, there is nothing for DOS to list 
when it looks on the disk where it expects to find 
the directory. 

All this is similar to the fact that you can't use 
BASIC to LIST a machine language program. BASIC 
insulates you from machine language just as DOS 
insulates you from a disk system that inherently 
works only with sectors. You can use a disassembler 
to decode and list machine language. Likewise, there 
are programs that can directly reafl and display sec¬ 
tor data. But just as you can’t make much sense of a 
disassembly without any knowledge of machine lan¬ 
guage, the sector data can also be hard to follow 
without some background on how the disk drive and 
DOS work. 


Colorful 64 Sprites 

In looking over the various informational sources 
on sprites, I have come across a subject unan¬ 
swered by all of them. The question is this: How 
does one tell the computer what color to make a 
certain part of a multicolored sprite? 

Michael O'Day 






colors. The four colors are 1) background t 
2) multicolor 1, 3) multicolor 2, and 4) sprite color. 
The locations to POKE to set the colors are as 
follows: 

Background color: POKE 53281 

*- ' POKE 53285 

POKE 53286 

POKE 53287 through 53294 
The eight sprite color locations correspond to the 
eight different sprites. For more information on 
programming with sprites, see the 64 Pro¬ 
grammer's Reference Guide, "Programming 
Graphics" section. 


tricky. Also, the cursor will only be visible when 
resting on a character. It wouldn't be too hard to 
write a machine language editor for using large siz 
characters (perhaps with GRAPHICS 7). 


Atari Peripheral Adequacy 

I have an Atari 400 computer and an Atari 410 
cassette recorder. I'm planning to buy an Atari 
800XL computer, and I was wondering if the cas¬ 
sette recorder would work on the Atari 800XL 
computer. 

Isaac Thornton Scott 

As long as your recorder is still working fine with 
your 400, there should be no problem using it with 
an 800XL. You may want to have the tape heads 
cleaned and demagnetized, even realigned to give 
you a fresh start with your new computer. All 
400/800 peripherals we know of will work just fine 
with the 600XL and 800XL computers. 


Atari Graphics 2 Vs. 0 

I have an Atari 1200XL. I have trouble seeing, so 
I prefer to use the largest size text mode, 
GRAPHICS 2. Is it possible to use this mode in 
place of GRAPHICS 0 for entering, editing, and 
running programs? 

Wanda Ellis 

First, you should be aware that GRAPHICS 2 inter¬ 
prets text characters differently than GRAPHICS 0. 
As set up, only uppercase characters are permitted. 
Lowercase characters, inverse characters, and in¬ 
verse lowercase characters all appear in distinctly 
different colors than uppercase text, but still appear 
as uppercase. The screen editor is set up to work 
with GRAPHICS 0, which has 40 columns and 24 
lines. GRAPHICS 2 has 20 columns and 12 lines. It 
is possible to use GRAPHICS 2 in place of GRAPH¬ 
ICS 0, in a limited way. Enter this line to see the 
technique: 

GR.2 + 16:POKE 87,0 

The +16 disables the text window, and POKE 87,0 
fools the Atari into thinking it is in GRAPHICS 0. 

In this mode you will be able to type lines and even 
cursor around and make changes. The bottom half of 
the screen will be invisible, so scrolling will be 


COMPUTE! welcomes questions, comments, or 
solutions to issues raised in this column. Write tc 
Readers' Feedback, COMPUTE! Magazine, P.O. 
Box 5406, Greensboro, NC 27403. COMPUTE! 
reserves the right to edit or abridge published 


Maxell Floppy Disks 

The Mini-Disks 
with maximum 
quality 

Dealer inquiries invited. CO.D’s accepted. 

Call FREE (800) 235-4137. 













Computers And Society 

David D. Thornburg, Associate Editor 


Computer-Assisted 
Explorations With Music 


I was having lunch with a friend one day when 
the conversation drifted to the subject of music, 
specifically the different aspects of music educa¬ 
tion. It was suggested that we spend a lot of time 
teaching skills in the reading and performance of 
musical compositions (especially with young¬ 
sters), but we spend little or no time teaching 
children (or adults, for that matter) how to create 
their own musical compositions. 

As I thought about the similarities between 
this traditional approach to music and traditional 
approaches to, for example, math education, I 
was struck by an interesting idea. One of Logo's 
appropriate claims to fame is that it helps chil¬ 
dren to think mathematically—to explore 
mathematics as an experimental science, and to 
make math discoveries without outside “help" 

(or intervention). Professor Papert wanted to pro¬ 
vide an environment in which children were free 
to explore mathematics on their own terms—to 
secure their own "ownership" of mathematical 

While these are appropriate goals for 
mathematics education, they are no less appro- 


David Thornburg is an author and speaker who has been 
heavily involved with the personal computer field since 
1978. His main interest is in making computers respon¬ 
sive to people's needs. He is the inventor of the KoalaPad 
graphics tablet and is the author of nine books about 
programming. David Thornburg's recent books include 
Computer Art and Animation: A User's Guide to Atari 
Logo, The KoalaPad Book (in which Musicland is also 
described), and Exploring Logo Without a Computer (a 
book for teachers). All three of these books are published 
by Addison-Wesley. His Macintosh book (101 Ways to 
Use a Macintosh) will appear soon from Random House. 
He has been called "an enthusiastic advocate for a 
humanistic computer revolution," and his editorial opin¬ 
ions have appeared in COMPUTE! since its inception. 


priate when applied to other fields of endeavor, 
including music. In fact, I would guess that the 
general public might find music discovery to be 
every bit as exciting as math discovery. 

It turns out that the "discovery-based- 
learning" approach to music is not a new idea. 
Garl Orff and his colleagues created an excep¬ 
tional program in this area that is still used in 
some schools. But just as Logo lets an individual 
make discoveries on his or her own, I think that 
the music discovery environment should operate 
in the same way. The computer is a perfect tool 
for this, and the idea of a musical equivalent to 
Logo is quite exciting. 

A music program philosphically attuned to 
the Logo experience is already on the market, 
and it will soon be joined by add-on programs 
that preserve the spirit of discovery as the user 
explores musical ideas on his or her own. The 
product to which I am referring is Musicland 
from Syntauri. 

Musicland is presently available for the Apple 
II family and requires the MusicSystem cards 
from Mountain Hardware. The user can interact 
with the system through the joystick, or KoalaPad. 
To give a feel for the areas that can be explored 
with this product, I will describe it in some de¬ 
tail. Musicland is divided into four types of activ¬ 
ities: Music Doodles, Timbre Painting, Music 
Blocks, and Sound Factory. While these activities 
have cute names, and can be used by small chil¬ 
dren, Musicland is no more a kid's product than 
is Logo. Professional musicians have enjoyed it 
every bit as much as children. 

Music poodles lets you create motifs by 
"drawing them" on a grand staff appearing on 
the screen. For example, if you wanted to hear 
some music that looks like the letter A, all you 
would have to do is draw an A on the screen 
(see Figure 1). 
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If getting the whole family together 
is a real challenge, majbevou need games 
that really challenge the whole family: 


Introducing a new generation 
ot computer games. Family Learning 
Games from Spinnaker. 

Ever notice how a little fun with the 
family can be a little hard to arrange? 

Well, now there's a solution - Spinnaker's 
Family Learning Games. A whdle family of 
great games that make getting the family ' 
together seem like child's play. And make 
''family fun" really seem like fun again. 
What's more, they'll even help your kids 
develop some very important skills. 


What makes our Family Learning Games 
so special? Well, for one thing they're 
designed to challenge and excite everyone 
in the family, from grade schoolers to 
grownups. Their unique combination of 
chance and strategy makes them perfect 
for young players, yet challenging enough 
that everyone will want to play them again 

But what makes our Family Learning 
Games even more unique is how they help 
kids learn - about problem solving, strategiz- 
ing, spelling, even Greek mythology. That's 


quite a bit more than they'd learn from a 
typical board game (if you could even get 
them to play a typical board game). 

So next time you want to get every¬ 
body together, don't get discouraged - get 
Spinnaker's Family Learning Games. 

You'll find the biggest challenge in family 
fun won't be on the refrigerator. It'll be 








Figure 1: Drawing The Sound Of A 



Figure 2: From Picture To Notes 
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Figure 3: 

Experimental Transformation Of Motif 
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When this drawing is finished, Musicland 
translates the picture into notes. Note duration is 
represented by length, and note value is repre¬ 
sented by vertical position. Sharps and flats are 
indicated by partial positioning on the staff. The 
result resembles a player piano roll more than it 
does a traditional score. (See Figure 2.) 

Once a motif has been drawn, you are free 
to experiment with it and to transform it anyway 
you want. For example, a motif can be stretched 
or compressed in time (including making it play 
backwards), and it can be stretched or com¬ 
pressed vertically (including turning it upside 
down). A motif can be transposed to any position 
on the staff, and as a result, one musical idea can 
be transformed into the structures used in music 
from Baroque fugues to the 12-tone-scale music 
of Schonberg. For example, I have transposed and 
inverted our motif before placing it next to the 
original in Figure 3. 

Timbre Painting lets you add color to your 
music by painting over notes with colors that 
pertain to various instruments that have been 
created in the Sound Factory. Once you have cre¬ 
ated a motif using Music Doodles, you can create 
entire melodies by bringing several doodles to 
Music Blocks. This tool lets you assemble a com¬ 
plete piece by building the composition from an 
assembly of any of five music blocks you have 
created with Music Doodles. By pointing to a 
block, you can automatically place it at the next 
available location in the score. (See Figure 4.) 
Once the blocks are in place, they can be 
switched around or deleted until the final com¬ 
position meets your goals. 

The Sound Factory gives you the complete 
freedom to create your own musical sounds by 
selecting harmonic content and a time envelope. 
Because of the ease with which various sounds 
can be made, you can experiment with many 
types of sounds. Musicland even lets you work 
With the sound waveform instead of the har¬ 
monic content, if you wish. 

The documentation includes project cards 
and shows that Musicland can be used as a tool 
for experimenting with musical ideas, and as a 
tool for exploring the physics and aesthetics of 
sound as well. 

Musicland was designed by Dr. Martin Lamb 
and his colleagues at the University of Toronto. I 
expect further product developments in this area 
in the near future. 

As we see more discovery-based-leaming 
emphasis in our educational system, we will con¬ 
tinue to see the computer being used in ways 
that show the unique strengths of this medium. 
The computer is not just a teaching tool—it is a 
tool to help us learn. The distinction is important. 


























Far more than mere chambers of wonder, these chambers are filled with 
horror. Poisonous scorpions, screeching bats and terrifying mummies. And in the 
timeless tradition of the most daring expeditions, you’ll pack a pistol, plenty of ammo 
and a whip to crack the curse of the pyramids. Earthquakes rumble along 
cavernous passageways. Walls cmmble and crackle with gunfire. Your mission is 
to make it through all 91 chambers and 13 levels. And then make off with 
the loot. The only things we can’t give you are the things you’ll need most. 
Cool reflexes, uncanny instincts and the courage to use them. 

Lost Throb™ Can you unravel the mystery? 

Available now for Atari, Commodore 64, Apple 
II series and IBM PC and PC/JR. Suggested retail 
price $29-95. Check with your local home computer 
software retailer for Lost Tomb™ and to learn of 
other great programs from Datasoft® send for a 
free consumer catalog. 


Datyoft 


e (818) 701-5161 





THE BEGINNER’S PAGE 


Printing And Asking 


In most versions of BASIC there are usually 
many ways to accomplish a task. For example, to 
clear the screen Atari users have the option of 
printing either a control character or CHR$(125). 
On any Commodore computer, the user has a 
similar option, but the CHR$ would have to be 
(147). Beginners usually decide that they prefer 
PRINTing the control codes between quotes. The 
reason for this choice is that the CHR$ command 
and the associated ASC command are often 
misunderstood. 

The CHR$ function is really a very easy 
function to use and to understand. Let's say that 
you wanted to print the letter A on your com¬ 
puter's screen. You could simply type PRINT 
"A" and hit the RETURN key. However, you 
could also PRINT CHR$(65). The result would be 
the same. Although it is always nice to know 
that you have different ways to do things, you 
probably are better off just printing the A on the 
screen. 

The real value of the CHR$ command is that 
it allows you to print special control codes such 
as cursor movement and screen clearing com¬ 
mands. It is far more confusing, for example, to 
have embedded commands (such as the reverse- 
video heart in a Commodore listing) than to have 
the same commands as CHR$. There are usually 
CHR$ codes that allow you to change the color 
of the cursor and even ones that let you ring the 
internal bell of the computer. On the Apple and 
Adam home computers you can easily have the 
bell ring by just PRINTing a few CHR$(7)'s. 

ASC The Computer 

The reverse of the CHR$ command is ASC. ASC 
will let you find out what decimal number repre¬ 


sents a given character. If, for example, you want 
to know the number that you would have to in¬ 
clude with a CHR$ to PRINT a comma on the 
screen, you could just ask the computer via ASC. 
The correct syntax for the command is PRINT 
ASC("/'). You would get 44 as the answer. If 
you then PRINTed CHR$(44), the computer 
would print out a comma. An easy way to 
remember what each function does is to remem¬ 
ber that ASC is used for asking the computer for 
the correct number and the other is for giving the 
computer the right number. 

Secret Coding 

Program 1 demonstrates the characters immedi¬ 
ately available on your home computer. When 
you run the program, keep in mind that it will 
print out all of the available characters as well as 
control codes. The control codes will affect the 
appearance of the output to the screen. For 
example, once the loop reaches 125 in the Atari, 
the screen will be cleared. 

One reason you might want to use CHR$ 
within your programs is that you might want to 
conceal words when someone uses one of your 
programs. In a game of Hangman you might want 
all the words placed in DATA statements in their 
ASCII numerical format. This will prevent the 
user from cheating. It is quite confusing for a 
snooping user to come across a long list of seem¬ 
ingly random and meaningless numbers. Only 
you will know! 

Program 2 is an example of how you might 
encode a sentence so that only you know what it 
means. If you take a close look at lines 50-70, 
you'll notice that it takes a lot more space to 
store a sentence in this method than it would to 
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PLAYING 
GAMES 
WITH 

If you’ve been having a hard time 
teaching your newly-adopted computer 
there’s more to life than fun and games, 
you’re not alone. 

Now, you can introduce your Commodore 64™ to the Work Force: affordable, easy-to- 
use software and hardware that will unleash the power you always expected from your 
Commodore 64 ™, but thought you might never see. 


PaperClip " 

is simply the best word processing program of its 
kind—loaded with advanced features, yet so easy to 
use even a novice can get professional results. With 
SpellPack™, it even corrects your spelling! Once you’ve 
tried it, you’ll never use a typewriter again. 

The Consultant " 

(formerly Delphi's Oracle) 

is like a computerized filing cabinet with a 
brain. Organize files for recipes, albums, 
or the membership of your service club. 

Then search, sort, arrange and 
analyze your information with speed 
and flexibility that’s simply astounding. 

SpellPack ™ 

teaches your 64 to spell, it checks ar 
document in 2 to 4 minutes against a 
dictionary of over 20,000 words. And you 
can add up to 5,000 of your own 
specialized terms. Type letter perfect every 


186 Queen Street West, Toronto, Canada 



BusCard II 

is a magic box that lets you transform your humble 
me computer into a powerful business machine. It 
gives you the added power of BASIC 4.0, and lets 
you add IEEE disk drives, hard disk, virtually any 
allel printer, and other peripherals without extra 
interfaces. Completely software invisible. 

B.I.-80 ™ Column Adaptor 

gives you ciystal dear 80 column 
display. Using the highest quality 
hardware, we’ve eliminated the problems 
of snow, fuzziness and interference. 
Basic 4.0 commands greatly simplify 
disk drive access. Switches easily from 
40 to 80 column display. 

Discover the true power of your 
Commodore 64 ™. Ask your dealer about 
the Commodore 64™ Work Force, from 
Batteries Included—the company that 
doesn’t leave anything out when it comes 
to making things simple for you. 


CA. 92626 (714) 979-0920 


Software Power! 

The Summer Consumer 
Electronics Show 

j Selby Ba’tergan Features Editor 


Some hardware manufacturers have bailed out, but 
software is soaring. The introduction of several new 
personal computers at the Summer Consumer 
Electronics Show, held in Chicago in June, was not 
the only story. Just as important was the 
overwhelming amount of new software in almost 
every conceivable field of interest. 


The gold-rush giddiness that brought 17 new 
computers to last year's Chicago's CES extrava¬ 
ganza is gone. This was the year of software. It's 
become a potential boom market in the highly 
competitive personal computer field. 

Remember these names? Atari 1400 XL, 
Mattel Aquarius and Aquarius II, Spectravideo 
SV-318 and SV-328, Texas Instruments TI- 
99/4A, Timex/Sinclair 1000. Several of these 
companies have backed away from manufac¬ 
turing personal computers over the past year. 
Some have withdrawn announced machines. It 
makes a long and revealing list. 

Nonetheless, CES did show that there's 
plenty of life, and more than enough interest, in 
the growth potential of the personal computer 
field. 

Miles Of Aisles 

More than 90,000 exhibitors, journalists, dealers, 
and celebrities strolled along the miles of exhibits 
at CES—the world's biggest trade show—looking 
at virtually every kind of consumer electronic 
product in the world. And a good percentage of 
those attending spent much of their time just try¬ 
ing to get around in one building, McCormick 
West—three warehouse floors full of nothing but 
computer hardware and software. 

More than 170,000 square feet of space was 
allotted in McCormick West at this year's show, 
a 25 percent jump over last year's floor area. 

And the sheer quantity of new software being in¬ 
troduced was enough to make even the most 
dedicated computerphile's eyes glaze over. 


The good news is obvious: more software for 
virtually every home computer, especially Com¬ 
modore, Atari, Apple, and IBM. And the bad 
news is equally plain: How can you learn about 
it all, let alone pick out the quality products? 

Where Were IBM And Apple? 

The software boom doesn't mean that computer 
hardware was unimportant at CES. The home 
computer market continues to evolve, and in 
some quite interesting ways. 

For example, IBM and Apple, two of the big¬ 
gest contenders in the personal computer field, 
didn't attend CES. Their dealer networks and 
their market strategies are not based around this 
trade show, as are some others. 

Commodore, Coleco, and Atari, three other 
major contenders, did attend, however. And 
what they introduced, announced, or revealed 
says a lot about where home computers are 
heading this year. (See ''Atari's CES Line-Up" in 
this issue.) < 

Possibly The Most Advanced 
Personal Computer Ever 

Some of the most fascinating computers at this 
CES were under wraps, available for inspection 
only to a privileged few. For example, the new 
high-end Atari computer was shown only to soft¬ 
ware developers, and most of the Japanese MSX- 
standard home computers due in the U.S. next 
year were seen only at a private party thrown by 
Microsoft. Likewise, what might be the most ad¬ 
vanced personal computer ever designed was 
shown behind closed doors inside the Amiga 
exhibit. 

The computer is code-named the Amiga Lor¬ 
raine, and right now it exists only in prototype 
form. But if it ever reaches production, and at a 
price even close to what is promised, it could sig¬ 
nal the beginning of a completely new genera¬ 
tion of personal computers. 

The Lorraine's graphics are a whole step 
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ahead of any personal computer now on the 
market. This computer is potentially powerful 
enough to make an IBM-PC look like a four- 
function calculator. Judge for yourself. Standard 
features include: 

• A Motorola 68000 microprocessor chip for 
the central processing unit. This is the same 
16/32-bit chip found in the Apple Macintosh. 

• 128K of RAM, expandable to 512K in¬ 
ternally and several megabytes (1000K) ex¬ 
ternally. 64K of ROM, with built-in BASIC and 
speech software, including a text-to-speech pro¬ 
gram. We heard the Lorraine talk in its male and 
female voices, and both were quite understand¬ 
able. The BASIC language is said to be very fast 
and compatible with Applesoft, though with ex¬ 
tra commands for graphics and other capabilities. 

• Built-in 320K double-sided disk drive, IBM- 
compatible. A second external drive can be 
powered by the internal power supply. 

• Built-in 300-bps (bits per second) modem, 
replaceable with a 1200-bps modem. 

• Parallel and serial interface ports; a top 
“chimney port" for individually powered expan¬ 
sion modules, including more RAM and a hard 
disk drive; and a front cartridge slot for ROM 
software or coprocessors, such as an 8088 mod¬ 
ule for IBM/MS-DOS compatibility. 

• Four sound channels, with music capabili¬ 
ties comparable to the Commodore 64's SID chip. 
We heard this demonstrated with a plug-in organ 
keyboard; the sound was very impressive. (One 
sound channel is used by the speech software.) 

• Medium-resolution graphics of 320 X 200 
pixels (screen dots), and hi-res graphics of 640 X 
200 pixels, with a total of 4096 colors. (That's not 
a typo. We saw a dramatic rainbow demo which 
supposedly displayed all 4096 colors on the 
screen simultaneously, though we didn't have 
time to count them.) 

• Eight sprites (up to 16 colors each) with 
collision detection and display priorities. Plus an¬ 
other feature called "frame-buffer animation," 
which lets you pick up any piece of the screen 
and move it anywhere else. Plus built-in com¬ 
mands for line-drawing, fills, and both horizontal 
and vertical fine scrolling. Plus split-screen 
graphics, with each screen "window" capable of 
displaying different graphics modes while operat¬ 
ing independently, even with fine scrolling. 

• Outputs for TV, composite video, and two 
types of RGB (red-green-blue) direct-drive mon¬ 
itors. The TV output shown to us was so pure 
that 80-column text (also standard) was almost 
readable from across the room. 

• On top of all this, Amiga claims the Lor¬ 
raine will come bundled with software, including 
a disk operating system, word processor, and 
spreadsheet. 


So how much will this wonderbox cost? 
According to Amiga, only $1500. Amiga also 
claims the Lorraine will be ready for shipment by 
Christmas. 

However, there's a big difference between 
design engineering and production engineering. 
The Lorraine at the June CES was such a rough 
prototype that it was operated from a remote 
terminal. To gear up for production in less than 
six months will take a herculean effort, and lots 
of capital. 



Commodore's new Plus/4 computer—a revised version of 
the 264 shown by Commodore last January—has four 
programmable function keys and four separate cursor keys. 


Commodore’s Plus/4 And 16 

Commodore showcased two new computers. The 
Plus/4, which Commodore calls its "productivity 
machine," is based on the technology introduced 
(but never released) with the Commodore 264 at 
January's CES in Las Vegas. The Plus/4 comes 
with four built-in integrated programs: a word 
processor, data base, spreadsheet, and graphics. 

The 64K RAM (random access memory) 
computer allots a full 60K for BASIC program¬ 
ming, and features an enhanced BASIC with over 
75 commands, including 11 for graphics. The 
machine also has eight reprogrammable function 
keys, four separate cursor keys, 128 colors (16 
primary colors and 8 luminance levels), a 320 X 
200 pixel screen resolution, and a 12-command, 
built-in machine language monitor. 

Commodore believes the Plus/4 offers a 
productivity-oriented alternative to the popular 
Commodore 64, which continues to sell very 
well. The Plus 4 does not have such attractive 
Commodore 64 features as the versatile SID 
(Sound Interface Device) chip, with its three in¬ 
dependent voices, or the eight programmable, in¬ 
dependently movable sprites. 

Since the Plus/4 is significantly different 
internally from the 64, the two are largely in¬ 
compatible when it comes to software. Commo¬ 
dore emphasizes that sales of the 64 continue to 
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device, and can handle cartridge 
or cassette-based software. 
However, the 16 does have a 
disk drive port for those who 
wish to use it. Special features 
include a built-in machine lan¬ 
guage monitor, graphics and 
sound commands, BASIC 3.5, 
and screen window capability. 

Commodore Peripherals 

Commodore also introduced the 
following peripherals at CES, all 
of which are scheduled for fall 
release (prices have not been 
announced as of this writing): 

• Commodore DPS 1101 
Daisywheel Printer —A business- 
oriented letter-quality printer 
which features a bidirectional, 
logic-seeking print mechanism 
that prints at 18 characters per 
second (cps). It is compatible 
with the new Plus/4 computer. 

• Commodore MPS 802 
Dot Matrix Printer—A bi¬ 
directional impact dot matrix 
printer with a speed of 60 cps 
for correspondence-quality 


be excellent, and that the com¬ 
pany's support of the machine 
will remain strong. 

The Plus/4 will reportedly 
sell for about $299, and is ex¬ 
pected to be on store shelves by 
this fall. 

“The Learning Machine” 

The Plus/4's younger brother is 
the new Commodore 16, which 
the company calls "The Learn¬ 
ing Machine." This 16K ma¬ 
chine is aimed at the first-time 
computer user, and will take the 
place of the still popular 4K 
VIC-20. 

Commodore officials indi¬ 
cated at CES that while the 
company plans to continue soft¬ 
ware support for the VIC, pro¬ 
duction has stopped on the 
machine. The new Commodore 
16 will reportedly retail for 
about $100, and is clearly aimed 
at the same market as the VIC. 

The Commodore 16 will 
use a Commodore Datassette re¬ 
corder as the primary storage 
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print. It is compatible with all 
Commodore computers and 
prints numerics, symbols, and 
all PET graphics. 

• Commodore MCS 801 
Color Dot Matrix Printer—A 
unidirectional color impact dot 
matrix printer for users of the 
Commodore 64. It prints at 30 
cps, with eight vertical dots 
and 640 columns, and pro¬ 
duces color graphics. 

• Commodore MPS 803 Dot 
Matrix Printer—The introduc¬ 
tory dot matrix printer is for the 
Commodore 16 computer, and 
prints alphanumeric and graphic 
characters with a variety of 
styles and capabilities. 

• Commodore 1531 Cas¬ 
sette—This cassette drive is 
aimed at users of the new Com¬ 
modore 16 computer. It uses 
standard audio cassette tapes; 
digital tapes are not necessary. 

• Commodore CM 141 Color 
Monitor—Designed to coordi¬ 
nate cosmetically with the 
Plus/4 computer, the CM 141 is 
also compatible with all of Com¬ 
modore's computer equipment. 

More Software For 
The 64 

Commodore also had several 
new software announcements. 
Working with Marvel Comics 
and Adventure International, 
Commodore will release a series 
of six adventure games, called 
Questprobe, which will feature 
superheroes from Marvel Com¬ 
ics. The first game will be The 
Hulk, which will be available in 
August for both the Commo¬ 
dore 64 and the Plus/4 
computers. 

Videotex 64 is a new soft¬ 
ware package from Commodore 
for the 64, which will allow you 
to create business graphics or 
other pictures in high-resolution 
color and combine them with 
text for transmitting over regu¬ 
lar telephone lines (using a 
VICMODEM) to other Videotex 
64 users. The package should be 
available by the time you read 
this (price to be announced). 


Commodore also intro¬ 
duced a new educational soft¬ 
ware program. Just Imagine, for 
the Commodore 64. The pack¬ 
age is designed to help children 
combine visual and verbal skills 
to create an animated story on 
the computer. Just Imagine is 
aimed at children from 4 to 14 
years of age, and has increasing 
levels of complexity. 

Finally, Commodore also 
introduced B/Graph, a charting 
and statistical analysis program 
for the Commodore 64, which is 
designed to analyze and convert 
any raw data into a graphic 
representation. 

“The New Adam” 

Coleco Industries, Inc., which a 
year ago made the biggest news 
at CES with its bundled Adam 
computer system, came to this 
year's show with the slogan, 
"The 1984 ADAM Is Ready." 

The company says that any 
reliability problems that the 
Adam may have had have now 


been corrected, and a new six- 
month warranty program has 
been instituted to demonstrate 
Coleco's confidence in its 
machine. 

Coleco announced the June 
shipment of a variety of new 
software programs for the 
Adam, including SmartLogo, a 
programming language; Smart- 
Letters & Forms, a correspon¬ 
dence program; SmartFiler and 
Recipe Filer, which organize 
home data; and SimpleCalc, a 
spreadsheet. Educational and 
entertainment titles were also an¬ 
nounced, including Electronic 
Flashcard Maker, Brain Strainers, 
ExpeType, Z axxon, Dukes of Haz¬ 
ard, and others. 

Among its hardware 
peripherals for the Adam, 

Coleco showed an additional 
digital data drive, which can 
store up to 512K of information 
on two data packs; a 5'A-inch 
disk drive; the AdamLink Direct 
Connect Modem, a 300-baud 
full-duplex modem with 









Atari’s CES Line-Up 


Despite continued belt-tightening, layoffs, and 
other reorganizational measures, Atari, Inc., ar¬ 
rived at the Summer Consumer Electronics Show- 
with an extensive array of software and a prom¬ 
ise to deliver a high-end personal computer 
before the end of the year. 


Banners on the press conference room walls 
and T-shirts handed out by Atari employees at 
the Summer Consumer Electronics Show 
(CES) in Chicago all said the same thing: 

"June 3, 1984—The Day The Future Began." 

Atari chose that date (the first day of CES) 
as the kickoff for its new line of products. And 
if the company is to have a prosperous fu¬ 
ture—if it is to have any future at all—Atari 
officials know that the reaction to its CES line¬ 
up of software and hardware must be very 
good indeed. 

Under President James Morgan's direction. 
Atari has been going through a top-to-bottom 
shuffle of people, products, and planning. 

After staggering financial losses during 1983 
and smaller losses in early 1984, Morgan has 
cut hundreds of employees, closed some re¬ 
search and development facilities, and pre¬ 
pared the remaining Atari employees to be 
part of a wholly different sort of company— 
smaller, more focused on selected products, 
and, perhaps above all, a credible producer of 
what Morgan terms "interactive electronics." 

To give meaning to those efforts. Atari's 
CES line-up was the strongest presentation of 
new products in quite a while from the Sunny¬ 
vale, California, company. 

A New High-End Computer 

First, Atari revealed that it will introduce a new 
high-end computer, reportedly for under $1000, 
in time for the Christmas buying season. The 
computer will be an extension of the XL line, 
very similar to the long-awaited 1450XLD. 

That computer was shown at two consecutive 
CES's, but is not going to be released. 

No name has yet been given to the new 
machine (as of this writing). But Atari says that 
the computer will have 64K of RAM (random 
access memory) and a built-in, double-sided, 
dual-density disk drive that stores 352K of 
RAM (about 250 typewritten pages of infor¬ 
mation). The disk drive is said to work five 
times faster than current Atari models. 

A data base, called Atari Grapevine, will 


be built into the new machine, as will an 
autoanswer and autodial 300-baud modem. 

The computer will also have an enhanced 
speech synthesis chip which will be capable of 
reading back words and phrases typed on the 
keyboard. Atari's new machine will be fully 
compatible with all Atari XL peripherals and 
software programs, say company officials. 

Expansion System And Add-On 
Computer 

Atari also reportedly plans to offer an expan¬ 
sion system for the new computer. The system 
will allow the computer to be expanded to 
128K and to have some compatibility (about 
70-80 percent) with other operating systems, 
such as CP/M (Control Program for Micro¬ 
computers), a popular business-oriented 
operating system, and MS-DOS (Microsoft 
Disk Operating System), on which IBM's PC is 
based. No price has been announced yet, but 
the expansion system should be introduced 
before the end of the year. 

Although Atari did not officially exhibit 
the new machine at CES, company officials did 
conduct closed-door showings for third-party 
software designers to encourage development of 
a substantial software base as soon as possible. 

Atari will also offer a new introductory 
computer which will be an add-on to the 
company's high-end 7800 ProSystem game 
console, announced in late May. The 7800 
Computer Keyboard operates with 4K of RAM, 
expandable to 20K. 

A line of selected computer software, 
including word processing, creative learning, 
and personal development programs, will be 
available for the new introductory computer. 
And the Computer Keyboard will be com¬ 
patible with almost all of the Atari computer 
peripherals. The add-on computer should be 
available before the end of 1984, priced at 
under $100. 

Atari unveiled several programs in a line 
of introductory computer software to be used 
with the 7800 ProSystem Computer Keyboard: 
Atari Terminal, a telecommunications cartridge; 
AtariLab, a science learning series; Typing Tu¬ 
tor, a tutorial typing game; The Word Processor; 
and BASIC. 

The MindLink System 

One of the most innovative products revealed 
by Atari at CES was its new MindLink System 





headband, which uses slight electrical impulses 
from muscles in the forehead to direct the ac¬ 
tion on your computer screen. 

Mindlink, which will be available for 
Atari's 2600 Video Computer System (VCS) 
and new 7800 ProSystem game machines this 
fall and for the XL computers in early 1985, 
will sell for a suggested retail price of $79. In¬ 
cluded will be the headband, two infrared sen¬ 
sors, and a software package. 

Atari plans three software packages for 
the unit initially—an adventure game, a new 
version of the popular Breakout videogame; 
and a relaxation, biofeedback program. 

The headband is surprisingly sensitive. 

And despite the initial skepticism of some 
members of the trade press, the MindLink Sys¬ 
tem proved easy to use (without having to 
wriggle your forehead, ears, or eyebrows to 
trigger it). There are also obvious long-range 
possibilities with this kind of technology for 
the physically handicapped who are not able 
to use conventional keyboards, joysticks, and 
other input devices. 

Early Learning Software 

Atari has teamed with child psychologist Dr. 

Lee Salk to develop early learning game soft¬ 
ware for toddlers (one to three years old) to 
use with the help of their parents. The first 
package, Peek-A-Boo, has eight levels of play 
and is supposed to help even very young chil¬ 
dren learn about cause and effect, spatial 
relationships, colors, shapes, and letters and 
numbers. 

The new videogame cartridges developed 
by Dr. Salk and Atari will use the previously 
developed Atari Kids Controller, especially de¬ 
signed for small hands. Peek-A-Boo will be 
available on the Atari 2600 VCS and the 7800 
ProSystem for a suggested retail price of $30, 
but will not be available for Atari computers. 

Futuremakers Series For Older 
Children 

Two computer software tours of space. This Is 
Ground Control and Through the Starbridge, 
were introduced as the first products in Atari's 
new Futuremakers series. 

Featuring 3-D animated graphics of plan¬ 
etary approaches and fly-bys, the programs are 
aimed at users ten years of age and older. 

The Futuremakers series should be available 
on disk for Atari computers about the time you 
read this, for a suggested price of $39.95 each. 

An Abundance Of Software 

Atari's CES announcements also included the 


following products: 

• Milestone Series: The Atari Learning 
Systems group has put together what it 
considers the best in home computer educa¬ 
tional packages not only from Atari, but within 
the entire industry. Milestone Series software 
will be not only for Atari computers, but for 
other systems like Commodore, IBM, and Ap¬ 
ple as well. Suggested retail price for most of 
the packages is $34.95, except where noted 
differently. 

AtariLab Starter Set ($89.95) and Tem¬ 
perature Module/Light Module are aimed at 
children from 4 to 12 years of age, allowing the 
user to conduct more than 100 experiments. 

Yaacov Agam's Interactive Painting (price to 
be announced) is a package developed by well- 
known kinetic artist Yaacov Agam, which helps 
the user generate original art by computer. 

Find It! is a series of visual perception 
activities and puzzles for children of all ages. 

The ABC of CPR is a home health library 
of software, the first module of which. First 
Aid, is a two-part tutorial and simulation de¬ 
signed to help build awareness and background 
information for handling first-aid emergencies. 

Wheeler-Dealer is an economic supply- 
and-demand game which lets the player learn 
how to handle a wide variety of business 
problems while becoming an auto industry 
magnate. 

Simulated Computer, which shows what 
goes on inside a computer, and Telly Turtle, a 
pictorial pre-Logo version of the turtle graphics 
concept, are two more titles in the Milestone 

• Atari Educational Software: Two new 
software packages for children 4 to 12 years 
old were introduced. Letter Tutor and Word Tu¬ 
tor, priced at $39.95 each. 

Atarisoft’s New Titles 

Atarisoft, the third-party software publishing 
division of Atari, Inc., announced numerous 
titles for the Commodore 64 and VIC-20, the 
Apple II family, and the IBM PC. 

Also, for the IBM PCjr, Atarisoft has in¬ 
troduced Centipede, Donkey Kong, Moon Patrol, : 
and Pac-Man. 

Suggested retail price for the Atarisoft games 
on disk is $34.95, and for cartridge, $44.95. 

7800 ProSystem Exhibited 

Atari also showcased its new high-end 7800 ■ 
ProSystem videogame console ($150 retail), 
which Atari says has the most advanced color 
graphics of any home computer or videogame 
currently available. 






AdamLink telecommunications software; a 
64K Memory Expander, which increases the 
memory capacity of the system from 80K to 144K 
RAM; the Adam Universal Interface, which has 
an RS-232 connector and a Centronics parallel 
connector which allows a user to connect 
peripherals and accessories from other manufac¬ 
turers; and an accessory kit which includes 
replacement daisywheels, cartridge ribbons, tape 
head cleaner, and a blank digital data pack. 

Sinclair’s QL Computer 

Sinclair Research Ltd. also showed a new com¬ 
puter at CES, the Sinclair QL, which was intro¬ 
duced in London in January and is scheduled for 
introduction in the U.S. this fall at a price of $499. 

The QL has 128K of RAM and is based on 
the Motorola 68000 microprocessor, the same 
microprocessor family used with the Lorraine 
and the Macintosh. There are two built-in 100K 
microdrives for mass storage, a 65-key keyboard, 
and the entire unit weighs just three pounds. 

The QL will come with a built-in BASIC as 
well as four applications software programs: 

Quill, a word processor; Abacus, a spreadsheet; 
Archive, a data base; and Easel, a graphics 

Sinclair will sell the QL by mail order in the 
U.S., and hopes to be receiving orders in time for 
the Christmas buying rush. 

The Software Boom Is On 

While computer hardware innovations continue 
to move the microcomputer world along at a 
dizzying pace compared to most industries, it is 
software growth that is sparking some of the 
greatest interest among consumers and computer 
industry entrepreneurs. 

While innovations in personal computer soft¬ 
ware may not be as plentiful as some critics 
would like, there is no question that the caliber 
of current software is far ahead of the programs 
produced even a year ago. 

Here are some of the more impressive pro¬ 
grams introduced at CES: 

Muppet Learning Keys (Koala Technol¬ 
ogies)—A computer peripheral for the Apple lie, 
lie, and the Commodore 64, Muppet Learning 
Keys is a computer keyboard which simulates the 
familiar contents of a child's school desk to help 
youngsters learn basic skills. 

Aimed at preschoolers, the package is a 
three-pound keyboard which parents can help 
their children use to learn the alphabet, numbers, 
colors, and shapes. The keyboard has equivalents 
to such school-desk standards as a ruler, water- 
color set, penmanship slate, compass, eraser, and 
arithmetic exercise book. 

Developed in association with Henson Asso- 



Koala Technologies announced the Muppet Learning 
Keys, a child's computer keyboard which uses the popu¬ 
lar Henson Muppets to help preschoolers learn about the 
alphabet, numbers, colors, and shapes. 


ciates, Inc. (creators of the Muppets), and Sun¬ 
burst Communications, Koala's Muppet Learning 
Keys incorporates Kermit the Frog, Miss Piggy, 
Gonzo, and other Muppets to provide friendly 
instructions. The package will sell for $79.95. 

Commodore, Apple Science Fiction- 
Based Software 

Trillium Science Fiction Series (Spinnaker Soft¬ 
ware)—Trillium, a new division of Spinnaker, is 
producing a series of interactive computer adven¬ 
ture games inspired by the novels of a number of 
best-selling science fiction authors. 

The first six titles, all of which will be avail¬ 
able in August or early fall on disk for the Com¬ 
modore 64 ($39.95 each) and the Apple II family 
($44.95), are: Rendezvous With Rama by Arthur C. 
Clarke, Amazon by Michael Crichton, Dragon- 
world by Byron Preiss and Michael Reaves, 
Starman Jones by Robert Heinlein, Fahrenheit 451 
by Ray Bradbury, and Shadowkeep, from which a 
book has been adapted by Alan Dean Foster. 

In these adventure games, the player as¬ 
sumes the identity of the characters. The scripts 
are professionally written—often with the direct 
collaboration of the original author—and the 
games feature high-resolution color graphics. 
Graphic clues are used, hints are available to re¬ 
duce frustration, and some contain arcade-style 
games within the adventure games. 

Michael Crichton, for example, wrote the en¬ 
tire script for Amazon and worked with the game 







designers. Arthur C. Clarke worked out an end¬ 
ing to Rendezvous With Rama for the game. 

Trillium plans other games based on science 
fiction novels by Phillip Jose Farmer, Roger 
Zelazny, Alfred Bester, and Harry Harrison. 

An Apple Adventure 

Robot Odyssey I (The Learning Company)— 
Following on the heels of its very popular educa¬ 
tional package, Rocky's Boots, The Learning Com¬ 
pany is introducing an educational adventure 
program, Rohot Odyssey I, designed for teenagers 
and young adults. 

Trapped in an underground world populated 
by robots, you can only escape by constructing 
your own robots. The program provides a game 
format while at the same time teaching the 
player how to design integrated electronic cir¬ 
cuitry, the fundamentals of building robots, and 
the basics of Boolean logic. There are an Innova¬ 
tion Lab and helpful tutorials which offer step- 
by-step instruction for players. 

Robot Odyssey I is the first program in The 
Learning Company's new DigiWorld Series, soft¬ 
ware that combines the interest in adventure 
gaming with the learning environment of a com¬ 
puter construction kit. The new program will be 
available for the Apple II family of computers at 
$49.95. 

Magic Spells And Monsters For 
Commodore, Atari 

Archon II: Adept and Skyfox (Electronic Arts)— 
One of the most popular of Electronic Arts' titles 
has been the original Archon, a chess-like strat¬ 
egy game that also includes videogame action. 
Free Fall Associates, the designers who created 


the game, have expanded on that theme for this 
sequel. Adept. 

Magic reigns in this game, with players 
conjuring spells, summoning monsters, and win¬ 
ning playing squares through individual combat. 
The new game gives players an expanded arena 
in which to fight, with more options and an al¬ 
tered game landscape. For a suggested retail price 
of $40, Archon II: Adept is available for Atari 
computers (with 48K) and for the Commodore 64. 

Apple lie Graphic Punch 

Dazzle Draw (Broderbund)—A complete illustra¬ 
tion package created especially for the Apple lie's 
double high-resolution capabilities and 128K of 
memory. The software is icon-based, much like 
the Macintosh. One unique tool in the package is 
the ability to draw with pen strokes of various 
shapes and sizes in 16 colors. Dazzle Draw can 
also be used with a 128K Apple lie with an 80- 
column card, a Revision B board, and one disk 
drive. Suggested price is $49.95. 

Activision’s Commodore 64 Programs 

Zenji and Toy Bizarre (Activision)—These two 
new games are among a dozen titles that 
Activision is releasing for the Commodore 64 
computer. Zenji is an intriguing strategy and puz¬ 
zle game with a distinctly Eastern flavor. The 
player mifst connect a glowing maze of elements 
(the Many) to a pulsating source (the One) to 
create a single unified green image, or "Zenji." 
The play is rapid and demanding. 

Toy Bizarre lets you control a character 
named Merton, who awakens in a toy factory 
which has gone berserk, as gangs of tyrannical 
toys attempt to take over the shop at midnight. © 
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"Keep it simple, and make it 
work" is the informal motto at 
Gerard O'Neill's Geostar Corpora¬ 
tion, a computer-based satellite 
positioning and communication 
company on the outskirts of 
Princeton, New Jersey. 

The motto is characteristic of 
O'Neill, a leading physicist, au¬ 
thor, and high-tech entrepreneur, 
who has a reputation as a vision¬ 
ary scientist with a knack for see¬ 
ing to the heart of complex issues. 

His first major scientific con¬ 
tribution came in 1956 when, as a 
29-year-old Princeton physics in¬ 
structor, he developed the storage¬ 
ring technique for colliding 
particle beams. The technique has 
become standard for subatomic 
particle accelerators in the field of 
high-energy physics. 

In his three books. The High 
Frontier: Human Colonies in 
Space; 2081: A Hopeful View of 
the Human Future; and most re¬ 
cently, The Technology Edge: 
Opportunities for America in 
World Competition, O'Neill has 
explored the possibilities of space 
colonies, satellite communications, 
computers, and the challenges 
facing the United States in its 
economic and technological 
development. 

For The High Frontier, 
O'Neill received critical acclaim 
and captured the popular imagi¬ 
nation with his simple, feasible 
plan for the development of space 
colonies. He also founded—and is 
president of^the Space Studies 
Institute, a privately funded orga¬ 
nization which has done much to 
further the goals of space 
exploration. 

Among the more arresting 
concepts he developed in The 
High Frontier was the mass- 



Dr. Gerard K. O'Neill 


driver transport device, a device 
with small buckets on a recircu¬ 
lating conveyor belt driven by 
magnetic impulses. The device 
could be used to efficiently eject 
mined lunar raw materials into 
space, propelling them to a space 
station under construction. 

His latest book, The Tech¬ 
nology Edge, addresses six "hot" 
technologies which O'Neill be¬ 
lieves are crucial emerging indus¬ 
tries: microengineering, robotics, 
genetic engineering, magnetic 
flight, family aircraft, and space 
science. If the U.S. does not com¬ 
pete successfully in these areas, 
he warns, it will lose the techno¬ 
logical and economic leadership it 
has enjoyed. 

Despite his many other inter¬ 
ests, it is the Geostar Corporation 
which currently occupies most of 
O'Neill's time and effort. Geostar, 
a development firm concerned 
with communication and naviga¬ 
tion via satellite, is a perfect 


blend of O'Neill's farsighted 
vision and his make-it-work 
practicality. 

The system which O'Neill 
and his colleagues are developing 
could revolutionize how we track 
and monitor aircraft and how we 
communicate with one another. 
Initially, the proposed system 
would have three satellites in geo¬ 
synchronous orbit over North 
America. The Geostar central 
computer facility would use the 
satellites to route tracking and 
communication data almost in¬ 
stantaneously for everything from 
commercial airlines to trucking 
companies, taxi services, police 
departments, and even individ¬ 
uals. The key to the system will 
be a hand-held transceiver which 
can send and receive messages 
through the Geostar network. 

During the interview, he re¬ 
marked that an airplane thou¬ 
sands of feet above Princeton was 
in the process, at that moment, of 
testing the Geostar system. 

An articulate and engaging 
conversationalist, O'Neill is inter¬ 
ested in how microcomputers are 
affecting our society. He keeps a 
well-used Apple II Plus within 
easy reach of his desk. On the day 
he spoke to compute!, O'Neill 
had been using a new Apple lie to 
test the portability of his II Plus 
programs to the new machine. 


Cl: A number of Japanese 
computer companies are now 
getting behind what's called the 
MSX operating system standard. 
And that will probably be intro¬ 
duced sometime soon in this 
country. Do you think that in 
the U.S. we will see a standard 
operating system? 
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Now your home computer can help you cook, keep your accounts, find an address or 
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The Home Organizer™ is fast enough to sort through your household belongings in 
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THE INCOMPLETE WORKS 
OF INFOCOM, INC. 


Incomplete, yes. But it’s not just 
because we’re always bringing out 
new stories in the Infocom interactive 
fiction collection. Nor is it simply due 
to the fact that with all the writing and 
re-writing, honing and perfecting that 
we put into every one of our stories, 
our work is seemingly never done. 

The real reason is: an Infocom 
work of fiction can never be complete 
until you become a part of it. 

You see, as hard as we work at 
perfecting our stories, we always 
leave out one essential element—the 
:er. And that’s where you 


Once you’ve got Infocom’s inter¬ 
active fiction in your computer, you 
experience something akin to waking 
up inside a novel. You find yourself at 
the center of an exciting plot that 
continually challenges you with sur¬ 
prising twists, unique characters 
(many of whom possess extraordi¬ 
narily developed personalities), and 
original, logical, often hilarious puz¬ 
zles. Communication is carried on in 
the same way as it is in a novel—in 
prose. And interaction is easy—you 
type in full English sentences. 


But there is this key difference 
between our tales and conventional 
novels: Infocom’s interactive fiction is 
active, not passive. The course of 
events is shaped by the actions you 
choose to take. And you enjoy enor¬ 
mous freedom in your choice of 
actions—you have hundreds, even 
thousands of alternatives at every 
step. In fact, an Infocom interactive 
story is roughly the length of a short 
novel in content, but because you’re 
actively engaged in the plot, your 
adventure can last for weeks and 
months. 

In other words, only you can 
complete the works of Infocom, Inc. 
Because they’re stories that grow 
out of your imagination. 

Find out what it’s like to get inside a 
story. Get one from Infocom. Because 
with Infocom’s interactive fiction, 
there’s room for you on every disk. 
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O'Neill: The whole issue of 
having computer programs that 
remain usable as you go for¬ 
ward in time—usable for the in¬ 
dividual person—is I think 
extremely important. I think 
manufacturers are, first of all, 
being far too callous and far too 
arrogant with their potential 
customers about what they've 
been doing to them in the way 
of operating systems and pro¬ 
grams. Fundamentally, if you 
buy a program and use it and 
then want to go over and buy 
somebody else's—or somebody 
else wants to sell you a com¬ 
puter, say—I think that the first 
question that they should be 
able to answer positively is the 
question: Will your new com¬ 
puter run all of the programs 
I'm used to? 

Now, they can tell you 
"We've got a whole bunch of 
other programs which are much 
more powerful" and have all 
kinds of bells and whistles and 
all of that. Fine, nothing wrong 
with growing. But they should 
also be able to tell you that, by 
the way, it will run all of those 
programs that you had before. 

As machines get more pow¬ 
erful in terms of processor ca¬ 
pability and memory capacity 
and so on, it's not that tough to 
do it. I would say any manufac¬ 
turer who sets up a general pol¬ 
icy of making equipment that 
will run anybody's programs is 
sure going to get my business 
and my owner loyalty forever. 
The problem is that up to now 
manufacturers have not even 
been compatible within their 
own product lines. 

Cl: There are predictions 
that by 1988 some 50 million 
homes in the U.S. will have per¬ 
sonal computers. In what ways 
do you see this increased aware¬ 
ness of computers affecting 
America's technological edge in 
the world? 

O'Neill: I think it will help 
a lot. It's already true, just be¬ 
cause of the accident that we 


work on an alphabet and the 
Japanese work, of course, with a 
character-based system, that we 
as a people are far more familiar 
with keyboards than they are. 
Young Americans growing up 
nowadays, working with per¬ 
sonal computers, are much more 
familiar with keyboards, much 
less scared of them, than the 
older generation. 

Geostar is a digital system, 
a keyboard-type system. It's not 
a voice system. It could be con¬ 
nected to a personal computer 
anytime. The message transfer 
capability is entirely consistent 
with the kind of telecommunica¬ 
tions that you like to carry out 
with your personal computer, or 


M anufacturers 
are ... being far 
too callous and far 
too arrogant with 
their potential 
customers...." 


from a portable computer. And, 
of course, by 1987, today's three 
or four pound computers that fit 
in a briefcase are probably going 
to be shrunk down to a quarter 
of an inch thick. You can carry 
those along with a Geostar 
transceiver, and be in instant 
touch with anywhere. 

Cl: In the U.S., companies 
like Apple and IBM and other 
microcomputer companies are 
very competitive. There is very 
little ability to travel from one 
system to another .... 

O'Neill: Yeah, that's a sore 
point with me. I get very exer- 

C!: Artificial intelligence is 


another area in which the Japa¬ 
nese are showing a great deal of 
concerted effort, just as they are 
in robotics. What's your view of 
the pace of change in artificial 
intelligence development? 

O'Neill: You run into some 
very strong opinions there. 
There's been a band of sup¬ 
porters for artificial intelligence 
for some 25 years. And all in all 
(although they are very bright 
people) I think it's fair to say 
that their accomplishments have 
been substantially less than they 
were advertising when they 

It's a very tough subject. 
One of the fundamental reasons 
why it's so tough is that if you 
really want to have machines 
that think like people, you have 
to go back to the beginnings of 
how computers were designed. 
You don't want a serial, bit- 
based machine. You need to 
have a machine which some¬ 
how can carry out the associa¬ 
tive function of the human 
brain. Which is a function that 
we have very little understand¬ 
ing of. You know, we do not 
understand the associative func¬ 
tion of the human brain nearly 
as well now as we understood 
binary arithmetic five thousand 
years ago. So, it's not just a 
question of how to design a 
computer, it's to even under¬ 
stand the problem well enough 
to know how to start it. I think 
there are sure to be some very 
exciting developments in artifi¬ 
cial intelligence over the next 
fifty years, but I'd be surprised 
if they come out of classical 
computer design of the kind 
that we're used to now. 

C!: In the field of 
microengineering, we're begin¬ 
ning to see more interest in 
what are called "biochips"— 
computer circuits that one day 
might be based on biological 
molecules. There are even a few 
biochemists who feel biochemi¬ 
cal engineering may lead to 
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The Switch Hitter 


The computer compatible electronic typewriter from Swintec. 


Now there’s a full-featured intelligent typewriter that 
can do double office duty as a letter quality computer 
printer... with just the simple flick of a key switch! 


The 1146CMP electronic typewriter from SWINTEC 
has built-in interface capabilities which allow it to 
function with virtually any computer. The computer 
compatible capability of the 1146CMP makes it 
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The computer is basic to the fully automated office; 
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some analog, rather than digital, 
biologically based microchips. 

O'Neill: You have to be 
careful about that, because one 
of the things we've discovered 
about genetic hardware is that 
when you really get down to 
the level of the way that cells 
work, they are binary, they are 
digital. They are not analog de¬ 
vices. The numbers of neurons 
acting and so on get to be big 
enough so that you can see 
what appear to be analog sig¬ 
nals, but when you really get 
down to the level of how any 
living organism works, it is a 
very mechanistic system which 
is much more digital than 
analog. And the way the genes 
and the various templates fit to¬ 
gether in genetics is a very rigid, 
very digital structure. 

So, I think we'll be follow¬ 
ing a dead end if we think that 
by kind of retreating to analog 
type systems we've somehow 
improved our chances of going 
into artificial intelligence. I don't 
think that's where the key is. 

But the notion that you don't do 
things in a linear, serial fashion, 
but that you do them in an as¬ 
sociative fashion, with all kinds 
of branches—that is funda¬ 
mental to artificial intelligence. 

C!: Do you think we'll see 
the widespread use of domestic 
or personal robots in American 
homes in the next 20 years? 

O'Neill: I think so. It's 
much more likely that the first 
practical household robot will 
grow out of hobbyist activities 
than that it will grow out of the 
activities of some large orga¬ 
nized company. It's the sort of 
thing that's going to take some 
fanatic working in a basement 
or garage to do right. 

C!: What forms will these 
robots have? 

O'Neill: It's really a ques¬ 
tion of where the market is. If 
you look at robots so far, if you 
had to try to characterize the 
successful ones in a single sen¬ 


tence, you would say that they 
are mechanical single arms. The 
next step is probably some de¬ 
gree of mobility. But I would 
guess, to be quite honest, that 
they are going to turn out to be 
applications of robotics that 
don't really stretch the art at all, 
that will have a profound im¬ 
pact on markets. For example, 
if you take something like a 
McDonald's hamburger place, 
and put relatively low-level in¬ 
dustrial robots in there, you 
may do a better job of making 
hamburgers. 

C!: What's the status of 
your Space Studies Institute? 

O'Neill: I forget offhand 


I t's the sort of 
thing that's going 
to take some 
fanatic working in 
a basement or 
garage to do 
right." 


the number of months in which 
its membership has doubled. 

But it's growing rapidly. 

The Institute is just re¬ 
ceiving now the results of a 
two-year study that was carried 
out under SSI (Space Studies 
Institute) funding by Rockwell 
International on the chemical 
processing of lunar soil. This is 
the first time that the actual wet 
chemistry has really been 
done—where people have put 
chemicals in test tubes. And that 
has come out very favorably. 

The mass-driver research, 
which was also Institute funded, 
has now progressed so well that 
it has now gone into a computer 
phase. The mass-driver-three 


design was basically worked out 
on an Apple computer. And 
then through that computer- 
aided design, the mass-driver- 
three model was built. It obeyed 
the CAD/CAM (computer-aided 
design/computer-aided manu¬ 
facture) design within one per¬ 
cent. The next phase is to go 
back to the computer and say, 
OK, now that you've had this 
cross-check, let's go ahead and 
design a complete lunar catapult. 

C!: Do you still see a mass- 
driver as the best vehicle for 
movement of materials in set¬ 
ting up the first space colony? 

O'Neill: Absolutely. It's 
going so well that it's not ex¬ 
pensive for us right now be¬ 
cause we're not having to build 
an elaborate test model. We've 
done that. 

C!: When do you estimate 
that it will be feasible? 

O'Neill: We have some 
rather close estimates on that 
because the Institute is on a 
five-year research program, 
which by coincidence will con¬ 
clude in 1987, At that time we 
expect to have an overall plan 
to publish which will have 
every essential technical build¬ 
ing block for space industry at 
least to the benchtop or pilot 
plan stage of application. And 
then to go from there to the 
point of economic productivity 
is roughly a five-year program. 
When that five-year program 
begins, of course, depends on 
when somebody buys into it to 
the level of funding that will be 
needed. 

There is a new research 
program of the Institute within 
that five-year plan, and we're 
just about to award the contract 
for it now. And that will be for 
the design of a solar-powered 
satellite specifically to be 
manufacturable out of lunar ma¬ 
terials. That's never been done 
before and obviously needs do¬ 
ing. And the Institute has the 
money accumulated from its 




members and its Senior Asso¬ 
ciates to do that work and has 
gotten the bids in for it and is 
just about to award a contract. 

C!: Despite the explosion in 
high technology we're experi¬ 
encing, our space program 
seems to have a lower national 
visibility now than in past years. 
Why is that, and what does it 
mean for the future? 

O'Neill: I think it's a cor¬ 
rect perception that the national 
awareness of it has decreased. 
Although interestingly enough, 
all of the surveys that have 
been done indicate that the na¬ 
tional support for a strong space 
program is broader based now 
than it ever was before. I think 
the reason that it's in low visi¬ 
bility is that there is no really 
very exciting program that 
NASA has. And we regard the 
work that we're doing as essen¬ 
tially independent of NASA, al¬ 
though the Institute's work is 
clearly based on taking all of 
the technology that has been 
developed in the first 25 years 
of the space program and is 
being developed right now. 

C!: Is the most exciting 
work being done by private 
companies? 

O'Neill: Well, I'm a highly 
biased source. I think the most 
significant thing going on is the 
research that the Institute is 
funding. That's why we're doing 
it. If we thought there was 
something else that had higher 
potential payoff, that's what 
we'd be doing. 

C!: When you first began 
advocating colonies in space 15 
years ago or more, you had a 
certain view of the potential it 
would have and how quickly it 
might come about. Has that 
changed at all? 

O'Neill: No, it really hasn't 
changed. The main difference is 
that I thought of it then as natu¬ 
rally a governmental program 
because the scale of funding 
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that was required appeared to 
be very big. As the result of, 
first, the five years or so of 
work that I did on my own, and 
then the ten years of work that 
has been done with a lot of 
people involved, it all looks a 
lot simpler and a lot smaller in 
scale than it did 15 years ago. 
Now it looks as if the action 
program to move out into space 
and use the energy and materi¬ 
als there in a productive way is 
probably a seven or eight billion 
dollar program instead of a 200 
billion dollar program. So it's in 
the scale of projects which have 
been privately financed. And I 
think that sometime in the late 
1980s, there could be some very 
exciting, creative new develop¬ 
ments in putting together a fi¬ 
nancial package of that kind 
which I would think of as prob¬ 
ably being done on a consor¬ 
tium basis by a number of 
companies. 

Although most people are 
not aware of it, the long-term 
result of the developments of 
the kind that the Space Studies 
Institute has been supporting is 
obviously human habitation in 
space and the movement out 
onto the high frontier. There 
has been since last October a 
very nice exhibit on that subject, 
which is easily accessible; 
namely, the General Electric 
Horizons Pavilion down at the 
Epcot Center in Disney World. 
That's about a 70 or 80 million 
dollar exhibit with a fantastic 
ride through four communities 
of the future. And the one that 
gets the lion's share of the at¬ 
tention and the time is the space 
colony, which is very accurately 
based on blueprints that were 
supplied to General Electric and 
to the Disney Enterprises by the 
Space Studies Institute. So, 
people who want to see in a 
very easy way in a few minutes 
what the long-term potential is 
there, should go and visit the 
Horizons Pavilion. And I sure 
hope they would come out of it 
wanting to support SSI. 


Cl: Do you think you will 
ever go into space? 

O'Neill: [Laughs] Sure 
hope so. 

C! You have a reputation as 
a scientist and as a writer; as 
someone with an ability to see 
through to the core of a prob¬ 
lem or an opportunity .... 

O'Neill: I'm glad you see it 
that way. Not everybody has 
been that kind [laughs]. 

C!: How do you handle the 
inevitable frustrations that occur 
when the pace of advancement 
lags, say, in space exploration? 

O'Neill: I don't think that 
it bothers me very much as long 
as I feel that I'm taking produc¬ 
tive action to make things hap¬ 
pen as fast as possible, rather 
than trying to fight with a gov¬ 
ernmental system which is fun¬ 
damentally pretty unresponsive. 
I just find it very much more re¬ 
warding, in terms of personal 
satisfaction, to be a part of the 
Institute's effort. We're doing it 

C!: In The Technology Edge, 
you put a great deal of empha¬ 
sis on the fact that the U.S. is 
going to have to compete to 
stay in the lead .... 

O'Neill: Absolutely. 

C!: Yet, at the same time, I 
sense that you have a feeling 
that international cooperation is 
desirable in the long run both 
technologically and economi¬ 
cally. How can we achieve both 
of those goals? 

O'Neill: It's a good ques¬ 
tion. The best thing, of course, 
is always to go by historical ex¬ 
ample. Most of the important 
openings up of economic oppor¬ 
tunity, the exploitation of 
economic opportunity, have oc¬ 
curred in a competitive fashion 
either privately or govem- 
mentally. And the space pro¬ 
gram is a classic example of 
that, even to the point where in 
Japan there are two different, 
competing space programs. 


Biochips: 

A Revolution In The Making 

Selby Bdwn<M FeaturdFEdftpr ' 


The silicon chip—the wafer-thin foundation of 
the computer world—may someday he replaced 
by a microscopic organic "biochip." Based on 
today's pioneering work in biotechnology, the 
biochip would be far smaller, faster, and more 
powerful than its silicon predecessor. 


In the not too distant future, Silicon Valley 
may have to change its name to Protein 
Valley. 

There's still plenty of time to work out 
the details of the name change. But there 
are already indications that the limitations of 
silicon-based transistors will drive the com¬ 
puter industry to a more effective and 
potentially more powerful technology. And 
a few biophysicists and electronics engineers 
are betting that the eventual winner will be 
in organic molecules manipulated to form 
superefficient microchips. 

Microscopic Switches 

In essence, these biochips would be micro¬ 
scopic switches which would transmit elec¬ 
trical impulses in much the same way that 
silicon-based chips operate today. The work 
is now in its earliest stages, and there are 
many who are skeptical of the long-range 
practicality of such technology. But small 
groups of optimistic entrepreneurs are 
spending millions of dollars on research to 
demonstrate the feasibility of the idea. 

"The prospects for support are excellent 
both from the government and the civilian 
sector," says biophysicist James H. McAlear, 
whose Gentronix Laboratories is a leader in 
the field. 

McAlear and partner John M. Wehrung, 
an electronics engineer, have already dis¬ 
cussed possible applications for bio- 
molecular electronics with officials at the 
Pentagon and the United States Information 
Agency (US1A). 

Heavy Traffic 

Why even consider abandoning the silicon 
chip? 

One major reason stems from the amaz¬ 
ing pace of technological change in the com¬ 
puter field. As computer chips have evolved. 


they have rapidly gotten smaller and less 
expensive. At the same time, the number of 
operations required per chip has leapfrogged 
upward. 

A microchip itself is little more than a 
grid of silicon tracks—sophisticated electrical 
relays—through which current flows or 
doesn't flow depending on what operations 
are being performed. The problem with sili¬ 
con chips develops when more and smaller 
tracks are crammed onto a chip. At a certain 
point, the electrons racing along these paths 
begin to adversely affect each other in what 
is called cross-talk. The circuitry is also 
prone to overheat as the electrons start to 
lose energy during their travels. 

Theoretically, organic molecules and 
specially developed proteins would offer 
none of these problems. They could also be 
manipulated to create the on-or-off, binary 
gates that form the basis of today's digital 
computers. 

Practical applications are likely to in¬ 
clude products ranging from erasable laser 
disks to molecular memory devices, for 
example. But the first applications may well 
be in sensing devices. 

“Noses On A Chip” 

"Noses on a chip" is what Daniel Hillis calls 
these sensing devices of the future. Hillis 
heads an artificial intelligence company in 
the Cambridge, Massachusetts, area that is 
also rumored to be working on research re¬ 
lated to biochip technology. 

"Chemo-detectors will be the first area 
of practical application for biochips," he says. 
"A chemical detector is basically for smelling. 

"For instance, imagine if your wrist- 
watch warned you when you needed to take 
a shower because you smell funny," he says. 

The biotechnology industry has so far 
achieved its greatest visibility through such 
recent microengineering feats as genetic 
cloning. But over the next decade—with 
technological advances expected to continue 
at their frenetic pace—biomolecular research 
on computer microchips and spin-off 
applications will likely achieve both in¬ 
creased popular awareness and financial 
backing. 








So, let's say we open up the 
opportunity for magnetic flight 
systems. I think you're going to 
find competitive construction of 
magnetic flight systems in a 
number of different countries 
and by different companies 
within the same country. All it 
takes is for the opportunity to 
be perceived, and everybody 
wants to jump in. 

The same thing is going to 
happen in light aircraft con¬ 
struction. The same thing is 
going to happen in space. So I 
don't see it as being an orderly 
international cooperative pro¬ 
gram to move in a logical fash¬ 
ion into space. It's going to be a 
disorderly, helter-skelter, com¬ 
petitive thing. It's just the way 
human beings do things. And 
oddly enough, it's probably the 
most effective way. Part of the 
reason for that is that very large 
structures tend to be inefficient 
and bureaucratic by their very 
nature. I have seen international 
cooperative organizations in sci¬ 
ence working, and they are 
some of the worst bureaucracies 
you could ever find. Groups of 
impassioned young scientists 
working away to try to make 
something happen are far 
more effective per dollar spent 
than these huge cooperative 
international programs. 

On the other hand, there 
are certainly examples interna¬ 
tionally of operations which are 
generally perceived as useful, 
and so naturally worldwide in 
scope, that they do become ef¬ 
fective international programs 
which cross all ideological 
boundaries. Intelsat is one ex¬ 
ample of that. 

Where could that sort of 
thing happen again? I would 
guess that there would be co¬ 
ordination in setting up solar 
power satellites in synchronous 
orbit; coordination to minimize 
interference with radio systems 
and so on. I would not expect 
that it would go to the point 
that all the solar power satellites 
would be built by the same en¬ 


tity. I think there would be a 
number of different competing 
entities from different countries 
making them. The saving grace 
is that solar power satellites are 
fundamentally a peaceful 
technology. 

C!: What kind of support 
are you finding for Geostar? 

O'Neill: It's been very posi¬ 
tive so far. All the heads are 
nodding together. Many, many 
industries have come to us and 
said that we are going to help 
them a lot. In fact, it's amusing. 
Many industries knock on our 
door, and the guys come in and 
say, "How did you know to de¬ 
sign a system that is exactly 


T he saving 
grace is that solar 
power satellites 
are fundamentally 
a peaceful 
technology." 


what we've been looking for?" 

The land transportation in¬ 
dustry, trucking companies, 
police departments, fire depart¬ 
ments, taxi services .... 

C!: And in the long run? 

O'Neill: In the long run, 
anybody 

C!: You have already com¬ 
pleted mountaintop and air¬ 
plane emulations of the Geostar 
satellite functions. What's the 
timetable for the actual satellite? 

O'Neill: So far, the com¬ 
pany has met all of its mile¬ 
stones. We are looking to begin 
service to the entire continental 
United States in 1987. 


One of the most critical 
items for that is the issuance by 
the Federal Communications 
Commission of what's called a 
"notice of proposed rule- 
making," which would allocate 
the spectra for the Geostar ser¬ 
vice. And that is going very 
well. There's a very strong pos¬ 
sibility that something impor¬ 
tant will have happened in that 
area even before your magazine 

The development of the 
transceivers actually takes just 
about as long as the develop¬ 
ment time for the satellites 
themselves. It's a different kind 
of technical task, but the time 
scales are about the same. 

C!: What types of services 
will Geostar provide? 

O'Neill: In aviation, the 
kinds of services that would be 
provided would be, for example, 
positioning, very accurately—on 
the order of meters. We can 
technically provide what's called 
radio location, which means 
feeding back the location of a 
vehicle or an aircraft to a fleet 
dispatch headquarters. We can 
provide for aircraft terrain 
avoidance, because we will have 
the stored terrain map. So if we 
see an aircraft heading toward a 
TV tower or a mountain, we 
will be feeding warnings to the 
pilot at the time. 

There would be, of course, 
a two-way digital message ser¬ 
vice, all provided through the 
same device. And you could 
send a message from any trans¬ 
ceiver to any other transceiver 
with a typical delay of about 
six-tenths of a second. And 
lastly, it is also an emergency 
warning system, because the 
ground station computer will be 
tracking aircraft. And if you see 
an aircraft which is heading to¬ 
ward a collision with terrain, 
first of all, you'll be sending 
warnings; automatically gener¬ 
ated by the computer, and if the 
aircraft does crash, you will rec¬ 
ognize the fact from several 




confirming sources. And that's 
important, because the so-called 
emergency locating transmitters 
(ELT) that are now federally 
mandated and carried by aircraft 
have a horrendous false alarm 
rate—approximately 98 percent 
of all ELT firings are false 
alarms. 

C!: How does Geostar fit in 
among the six high-tech fields 
you discuss in The Technology 
Edge ? 

O'Neill: Well, the six tech¬ 
nology areas that 1 identified as 
being, in my judgment, places 
where there is the biggest 
opportunity for major new mar¬ 
kets up in the tens or hundreds 
of billions of dollars a year— 
things that would really make a 
difference on a worldwide scale 
of competition—really divide 
themselves into two halves. The 
first three are things that people 
feel they know all about, al¬ 
though they really don't as I 
tried to point out in the book. 
There are a lot of things that 
people didn't realize. The 
microengineering—which covers 
all of computer electronics and 
so on—the robotic area, and 
what I call genetic hardware. In 
the first two, the battle has al¬ 
ready been joined on a very 
large scale. 

The last three of those six 
areas are particularly interesting 
to me because they are still up 
for grabs. The first one is mag¬ 
netic flight—very high-speed 
transport in a vacuum under¬ 
ground using principles of phys¬ 
ics which are in fact more than 
a hundred years old. 

The fifth area, the possibil¬ 
ity that family aircraft, light air¬ 
craft, might be a new growth 
market, in its turn as big as 
automobiles were 60 years ago, 
is one that is the first place 
where I would see Geostar play¬ 
ing a role (in one of those six 

As we become a more and 
more dispersed society—new 


industries being built not in the 
traditional city centers but often 
small towns and more and more 
people moving to settle in sub¬ 
urbs and small towns, as is hap¬ 
pening—you end up more and 
more in a situation where tradi¬ 
tional transportation systems— 
which basically go from city 
center to city center—are just 
not very effective. If you want 
to go from New York to San 
Francisco, great. The airlines are 
perfectly set up to do an excel¬ 
lent job of that. But if you want 
to go from some small-town 
area to another small-town area, 
which is more and more the 
case these days with business 
travel, you don't get served very 
well. So the market is there. 

Cl: How would Geostar 
have an impact on aviation? 

O'Neill: The way that 
Geostar would affect aviation is 
sort of generically the same way 
that it would affect a number of 
other situations in life and af¬ 
fairs. The difference is that in 
aviation, all the needs come to¬ 
gether in one place. The funda¬ 
mental thing is that the Geostar 
transceiver is a very light, 
simple, inexpensive thing, 
which in effect can run on 
double-A cells. It's a goal which 
the manufacturers regard as not 
at all impossible. 

Cl: How can the U.S. best 
maintain its lead in the area of 
computer development? 

O'Neill: Computer devel¬ 
opment, of course, falls into the 
first of those areas. It's one 
where the battle is already 
joined and nobody has any very 
big lead. So, the opportunities 
for getting way out in front are 
not as good as they are in those 
last three areas. 

In general, for all of the 
long-term big payoff develop¬ 
ments that I was talking about 
in The Technology Edge, I think 
that the most important single 
change is a relatively minor one 


in the law, but it's an important 
one. And that would be a 
change that would favor funnel- 
ing even a small amount of 
money into long-term invest¬ 
ment. Everything in our eco¬ 
nomic system and our legal 
structure is set up right now to 
favor relatively short-term in¬ 
vestment. The venture capital¬ 
ists will tell you that they're in 
for the long term, but from their 
point of view three years is a 
long time. 

Cl: Right. Whereas the 
Japanese .... 

O'Neill: The Japanese think 
in the decade or multidecade 
time scale. Now there are a 
number of structural reasons 
about the Japanese economic 
and political structure why that 
is possible. But rather than try¬ 
ing to imitate that, I think that it 
makes more sense to do some¬ 
thing that we already know 
works in American society, and 
that is simply to alter the tax 
laws a little bit. And the alter¬ 
ation I would make is simply: 

Set it up so that if someone 
makes an investment in a com¬ 
pany . . . and leaves his money 
in for a full, say ten years, then 
all of the earnings and apprecia¬ 
tion—not just the capital appre¬ 
ciation associated with that, but 
the earnings from all of it— 
ought to be essentially untaxed 
for a long period of time. There 
ought to be a tax moratorium 
extending for at least several 
years on those returns. What 
that would do is just to divert a 
small amount of the roughly 
four billion dollars in venture 
capital funding, that now is gen¬ 
erated, into long-term invest¬ 
ments of that kind. It wouldn't 
have to be a whole lot. You 
know, the difference between 
one percent and none is already 
important. © 
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A Beginner’s Guide 
To Typing In Programs 


What Is A Program? 

A computer cannot perform any task by itself. 

Like a car without gas, a computer has potential, 
but without a program, it isn't going anywhere. 
Most of the programs published in COMPUTE! are 
written in a computer language called BASIC. 
BASIC is easy to learn and is built into most com¬ 
puters (on some computers, you have to purchase 
an optional BASIC cartridge). 

BASIC Programs 

Each month, COMPUTE! publishes programs for 
many machines. To start out, type in only pro¬ 
grams written for your machine, e.g., "TI Version" 
if you have a TI-99/4. Later, when you gain ex¬ 
perience with your computer's BASIC, you can 
try typing in and converting certain programs 
from one computer to yours. 

Computers can be picky. Unlike the English 
language, which is full of ambiguities, BASIC 
usually has only one "right way" of stating some¬ 
thing, Every letter, character, or number is signif¬ 
icant. A common mistake is substituting a letter 
such as O for the numeral 0, a lowercase 1 for the 
numeral 1, or an uppercase B for the numeral 8. 
Also, you must enter all punctuation such as col¬ 
ons and commas just as they appear in the 
magazine. Spacing can be important. To be safe, 
type iri the listings exactly as they appear. 

Braces And Special Characters 

The exception to this typing rule is when you see 
the.braces, such as {DOWN}. Anything within a 
set of braces is a special character or characters 
that cannot easily be listed in a printer. When you 
come across such a special statement, refer to the 
appropriate key for your computer. For example, 
if you have an Atari, refer to the "Atari" section 
in "How To Type COMPUTE!'s Programs." 

About DATA Statements 

Some programs contain a section or sections of 
DATA statements. These lines provide informa¬ 
tion needed by the program. Some DATA state¬ 
ments contain actual programs (called machine 
language); others contain graphics codes. These 
lines are especially sensitive to errors. 

If a single number in any one DATA statement 
is mistyped, your machine could "lock up, "or 
"crash." The keyboard, break key, and RESET (or 
: STOP) keys may all seem "dead," and the screen 


may go blank. Don't panic - no damage is done. 
To regain control, you have to turn off your com¬ 
puter, then turn it back on. This will erase what¬ 
ever program was in memory, so always SAVE a 
copy of your program before you RUN it. If your 
computer crashes, you can LOAD the program 
and look for your mistake. 

Sometimes a mistyped DATA statement will 
cause an error message when the program is RUN- 
The error message may refer to the program line 
that READs the data. The error is still in the DATA 
statements, though. 

Get To Know Your Machine 

You should familiarize yourself with your com¬ 
puter before attempting to type in a program. 
Learn the statements you use to store and retrieve 
programs from tape or disk. You'll want to save a 
copy of your program, so that you won't have to 
type it in every time you want to use it. Learn to 
use your machine's editing functions. How do 
you change a line if you made a mistake? You can 
always retype the line, but you at least need to 
know how to backspace. Do you know how to 
enter inverse video, lowercase, and control char¬ 
acters? It's all explained in your computer's 
manuals. 

A Quick Review 

1. Type in the program a line at a time, in order. 
Press RETURN or ENTER at the end of each line. 
Use backspace or the back arrow to correct 
mistakes. 

2. Check the line you've typed against the line in 
the magazine. You can check the entire program 
again if you get an error when you RUN the 
program. 

3. Make sure you've entered statements in braces 
as the appropriate control key (see "How To 
Type COMPUTERS Programs" elsewhere in the 
magazine). 


We regret that we are no longer able to respond to 
individual inquiries about programs, products, or 
services appearing in COMPUTE! due to increasing 
publication activity. On those infrequent occasions 
when a published program contains a typo, the correc¬ 
tion will appear on the CAPUTE! page, usually within 
eight weeks. If you have specific questions about items 
or programs which you've seen in COMPUTE!, please 
send them to Readers' Feedback, P.O. Box 5406, 
Greensboro, NC 27403. ■ © 
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character, consult you 

Atari 400/800 


ch are listed in COMPUTE! contain 
cursor control, color keys, inverse 
y to tell exactly what to type when 

mter. Refer to the appropriate 
ss an unusual symbol in a program 


can tell the difference between direct and programmed cursor 
control is the quote mode. 

Once you press the quote (the double quote, SHIFT-2), 
you are in the quote mode. If you type something and then 
try to change it by moving the cursor left, you'll only get a 
bunch of reverse-video lines. These are the symbols for 
cursor left. The only editing key that isn't programmable is 
the DEL key; you can still use DEL to back up and edit the 
line. Once you type another quote, you are out of quote mode 

You also go into quote mode when you INSerT spaces 
into a line. In any case, the easiest way to get out of quote 
mode is to just press RETURN. You'll then be out of quote 
mode and you can cursor up to the mistyped line and fix it. 

Use the following tables when entering special characters: 


VIC And 64 


Graphics characters, such as CTRL-T, the ball character • wi 
appear as the "normal'' letter enclosed in braces, e.g. IT) . 

A series of identical control characters, such as 10 space 
three cursor-lefts, or 20 CTRL-R's, will appear as (10 
SPACES), i 3 LEFT K, 120 R1, etc. If the character in braces i: 
in inverse video, that character or characters should be en¬ 
tered with the Atari logo key. For example, t n } means to 


Commodore PET/CBM/VIC/64 

Generally, any PET/CBM/VIC/64 program 
words within braces which spell out any,s^c«_iai 
t DOWN J would mean to press the cursor down key. 15 

To indicate that a key should be shifted (hold down the 
t SHIFT key while pressing the other key), the key would be 

type the S key while hofding the shift key. If you find an 
underlined key enclosed in braces (e.g., {10 Nl), ypu should 

you would enter tenshifted N's). Some graphics characters 
are inaccessible from the keyboard on CBM Business models 
(32N, 8032). 

For the VIC and 64, if a key is enclosed in special brackets, 
k >], you should hold down the Commodore key while pressing 
the key inside the special brackets. (The Commodore key is 
the key in the lower left corner of the keyboard.) Again, if 
the key is preceded by a number, you should press the key 
as many times as indicated. 

Rarely, you'll see in a Commodore 64 program a solitary 
“■—>f the alphabet enclosed in braces. These characters 
entered by holding down the CTRL key while typing 





would indicate that 


About the quote mode: you know that you can move the 
cursor around the screen with the CRSR keys. Sometimes c 

control. That's why you see all the {LEFTI's, (HOMEl's, 
and {BLU }'s in our programs. The only way the computer 


>or Up {UP} 
sorRight {RIGHT 


Texas Instruments 99/4 

The only special characters used are in PRINT statements to 
indicate where two or more spaces should be left between 
words! For example, ENERGY U0 SPACES) MANAGE¬ 
MENT means that ten spaces should be left between the 
words ENERGY and MANAGEMENT. Do not type in the 
braces or the words 10 SPACES. Enter all programs with the 
ALPHA LOCK on (in the down position). Release the ALPHA 
LOCK to enter lowercase text. 






















astator—a powerful mothership ready to destroy 
Earth. Out of nowhere, guardian ships attack. You 

have 30 seconds to destroy all of them—or else 
Earth is destroyed. Written for the unexpanded VIC, 
versions are also included for the 64, Color Com¬ 
puter, TD99/4A, Apple II, and IBM PC and PCjr, 
joystick required for alt versions except VIC 
(optional). 


the keyboard, you can substitute the following 
lines in Program 2: 

1000 IFPEEK(197)=17THENR=R-22 
1005 IFPEEKl197)=33THENR=R+22 
1010 IFPEEKl197)=28THENR=R-1 . 

1015 IFPEEK(197)=36THENR=R+1 

1110 POKEL+R, 219: IFPEEKl 197 )<>32THEN1128 


Si ■Ar.Ji.j 


"Devastator" is an action game where you must 
save Earth from aliens. What makes it different 
from similar games is that when you fail. Old 
Terra Firma is destroyed before your eyes. 

You and your comrades are in one-man 
spaceships skimming the surface of a huge alien 
craft known as Devastator. Suddenly, out of 
nowhere, guardian ships appear, darting and 
dodging swiftly, causing havoc among your ranks. 
Blast them by lining up your cross hairs with the 
center of the spaceships and pressing the fire but¬ 
ton. You have a mere 30 seconds to destroy ten 
ships before Devastator annihilates Earth with a 
death bolt. 


The VIC Programs 

This program is written in two parts because of 
the limited memory in an unexpanded VIC-20. 
Program 1 gives the instructions and customizes 
the characters. Be sure to save Program 1 before 
you run it. However, if you wish to view Program 
1 before saving it, temporarily add the line 295 
END. After you type in Program 2, save it with 
the name D. (For tape, be sure to save it im¬ 
mediately following Program 1.) Lines 305 and 
310 of Program 1 will then cause Program 2 to 
load and run automatically. 

The second program is the actual game. If 
you hit RUN/STOP and RESTORE anytime during 
the second program, you must type POKE 
36869,255—no line number is needed—to play 
the game again, this is the location of the 
customized characters. . 

Devastator is played with a 
joystick simply for ea 
However, if you war 


Delete lines 1016-1022. 

The difficulty level of this game can be 
changed by subtracting or adding time in line 
140, or by increasing or decreasing the number of 
points for ships hit (SC) in line 2000. (Each ship is 
worth ten points.) You can also make the ships 
harder to hit by changing the 9 in line 500 to a 
higher number. 

Here is an explanation of Program 2: 



Looks like a Ferrari. 
Drives like aRolls. 
Parks likeaBeetle. 



Ask your computer dealer 

to take the cover off a world-class disk drive. 

Theall new, 1984 Indus GT™ 

The most advanced, most handsome disk 
drive in the world. 

A flick of its power switch can turn an Atari 
into a Ferrari. 

Or an Apple into a Red Hot Apple. 


Looks like a Ferrari. 

The Indus CT is only 2.65" high. But under its 
front-loading front end is slimline engineering 
with a distinctive European-Gran flair. 

Touch its LED-lit CommandPost™ function 
control AccuTouch™ buttons. Marvel at how 
responsive it makes every Atari or Apple home 
computer. 


Drives like a Rolls. 

Nestled into its soundproofed chassis is the 
quietest and most powerful disk drive power sys¬ 
tem money can buy. At top speed, it's virtually 
unbearable. Whisper quiet. 

Flat out, the GT will drive your Atari track-to- 
track 0-39 in less than one second. Increasing 
data transfer 400%. (Faster than any other drive. 
And as fast as any Apple disk drive.) 


And each GT comes with the exclusive 
GT DrivingSystem ™ of software programs* 
World-class word processing is a breeze with 
the GT Estate WordProcessor™ And your dealer 
will describe the two additional programs that 
allow GT owners to accelerate their computer 

driving ski 11S. * lncl uded as standard equipment. 

Also, the 1984 Indus GT is covered with the 
GT PortaCase?" A stylish case that conveniently 
doubles as a 80-disk storage file. 


Parks likeaBeetle. 

The GT's small, sleek, condensed size makes it 
easy to park. 

And its low price makes it easy to buy. 

$449 for Atari. $329 for Apple. 

So see and test drivethe incredible new 1984 
Indus GT at your nearest 
computer dealer soor 
The drive will be 
well worth it. 


INDUS 




The all-new 1984 Indus GT Disk Drive. 

The most advanced, most handsome disk drive in the world. 


It all adds up... 
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Be careful—the graphics can make this a 
difficult program to type in. If you would like a 
copy (VIC version only), send a cassette tape, a 
self-addressed, stamped mailer, and $3 to: 

David R. Arnold 
620 Alger 
Owosso, Ml 48867 


BEFORE TYPING... 

If you're new to computing, please read "How 
To Type COMPUTERS Programs" and "A 
Beginner's Guide To Typing In Programs." 


Program 1: 

Devastator - Character Creator (VIC Version) 

Refer to the "Automatic Proofreader article before typing this 
program in. 

100 PRINT"{CLR}"sPRINT"{6 DOWN}{5 RIGHT}P 
LEASE WAIT" :rem 230 

105 PRINT"{3 DOWN} DEFINING CHARACTERS" 

srem 190 

110 POKE52,28 sPOKE56,28:CLR srem 67 

120 F0RI=7168T07679:POKEI,PEEK(1+25600):N 
EXT :rem 148 

130 F0RJ=1T022:READCs FORI=0TO7 s READD s POKE 
C+I, D sNEXT:NEXT srem 160 

140 POKE36869,255 sPOKE36879,10 sPRINT" 

{CLR}{9 RIGHT}{BLU}ABCD{DOWN}{4 LEFT} 
IJKL" srem 30 

145 PRINT"{4 DOWN}{RVS}{GRN}{6 SPACES}DEV 
ASTATOR"sFORT=1TO1000 sNEXT srem 156 

150 PRINT"{HOME}"TAB(A)"{7 DOWN} {YEL}MNO 
{DOWN}{4 LEFT} UVW"sA=A+lsIFA>=19THEN 
GOTO200 srem 235 

160 POKE36878,15 sPOKE36874,255 sPOKE36877, 
128sPOKE36878,0sGOTO150 srem 194 

200 PRINT"{RVS}YOUR MISSION IS TO 

{4 SPACES}PROTECT EARTH FROM THEAPPRO 
ACHING DEVASTATOR srem 214 

210 PRINT"{RVS}SHOOT DOWN AT LEAST 10GUAR 
DIAN SHIPS TO{5 SPACES}ENABLE YOUR CO 
MRADES srem 65 

220 PRINT"{RVS}TO DESTROY THE{8 SPACES}DE 
VASTATOR. srem 46 

230 PRINT"{DOWN}{RVS}(HIT KEY TO CONTINUE 

240 GETA$sIFA$=""THEN240 srem 79 

245 PRINT"{HOME}{9 DOWN}" srem 24 

250 PRINT"{RVS}YOU HAVE ONLY 30{6 SPACES} 
SECONDS TO COMPLETE{3 SPACESjYOUR PAR 

T OF THE{6 SPACES}"? srem 130 

260 PRINT"{RVS}MISSI0N. POSITION YOURCROS 
SHAIR WITH THE{4 SPACES}JOYSTICK. SHO 
OT BY{4 SPACES}"; srem 91 

270 PRINT"{RVS}PRESSING THE FIRE 

{5 SPACES}BUTTON.{37 SPACES}"srem 248 
280 GETA$ sIFA$=""THEN280 srem 87 

290 PRINT"{CLR}{9 SPACES}{BLU}ABCD{DOWN} 

{4 LEFT}IJKL"s PRINT"{DOWN}{RVS}{RED}R 
ED ALERT 1 DEVASTATOR APPR70ACHING1" 

300 PRINT"{RVS}GRAB YOUR JOYSTICK*ANDPREP 
ARE FOR BATTLE.{3 SPACES}FOR TAPE, PR 



1300 DATA7200,63,63,159,207,254,254,252,2 
52 srem 121 

1400 DATA7240,63,35,49,17,11,7,1,0 

srem 172 

1500 DATA7248,255,255,255,255,255,255,255 
,63 srem 194 

1600 DATA7256,129,1,3,131,131,199,207,220 
srem 15 

1700 DATA7264,252,248,248,240,240,224,128 
1800 DATA7208,0,15,59,245,123,31,0,0 
1900 DATA7216,0,255,189,90,189,255,0,0 
2000 DATA7224,0,240,220,175,220,240,0,0 

2010 DATA7272,96,192,160,16,9,6,31,245 

srem 134 

2020 DATA7280,32,112,80,248,108,151,111,2 
50 srem 104 

2030 DATA7288,48,24,40,64,128,0,192,248 

2040 DATA7336,63,15,7,8,16,160,192,96 
2050 DATA7344,255,255,39,32,112,136,136,1 

2060 DATA7352,240,192,0,128,64,40^24,48 

srem 176 

2070 DATA7360,8,16,41,7,61,31,17,35 

2080 DATA7368,16,8,148,224,188,248,8,132 
srem 253 

2090 DATA7168,255,255,255,255,255,255,255 
,2-55 srem 251 

3000 DATA7296,127,191,223,239,247,251,253 


305 S$="LO"+CHR$(34)+"D"+CHR$(34)+",1s"+C 
HR$(131) srem 62 

62 COMPUTEI August 1984 


DATA7304,254,253,251,247,239,223,191 
,127 srem 224 




























































Program 2: 

Devastator - Main Program (VIC Version) 

Refer to the "Automatic Proofreader article before typing thi 


0 TI$=”000000" :SC=0:T$="000020" 

10 V=36878:S4=36877:POKE36879,lC 

RINT“(CLR)"; :rem 147 

20 PRINT"(WHT}{2 SPACES).(3 SPACES). 

(2 SPACES)(BLU)ABCD(WHT) .(5 SPACES). 
(4 SPACES).{5 SPACES){BLU)1JKL{WHTJ 
(4 SPACES).(11 SPACES).(4 DOWN)"; 


5 PRINT"{36 SPACES)":RETURN :rem 134 
3 Y=INT(RND(.)*3):PRINTTAB(Y+F)"(6 UP) 
(22 SPACES}";:IFTI$>=T$THEN1900 

3 PRINT"(WHT)(8 SPACES)XY(64 SPACES)"; 


« 36 535 PRINT"(3 SPACES)":RI 


70 J=1:PRINT"(BLU)@@@@@@@@Q{4 SPACES)P@@@ 
@@@@@(PUR)@@@@@@@Q(BLU} @ (4 SPACES}@ 

(PUR)P@@@@@@@@@@@@@Q@(BLU}@ (4 SPACES)@ 

(PUR)@P@@@@@@"; :rem 121 

100 PRI-NT "@@@@@Q@@{BLU)Q@@@@P(PUR)@@P@@@@ 
@@@@@Q@@Q@@@@@@P@@P@@@@(BLU)@@@Q(PUR) 
@@Q@@@@@@@@P@@(BLU)P@@@"; :rem 120 

130 PRINT"@@Q@(PUR)@Q@@@@@@@@@@P@(BLU)@P@ 
@@Q@@(PUR)Q@@@@@@@@@@@@P(BLU}@@P@Q@@Q 
@@@@@@@@@@@@@@P@@P"; :rem 92 

140 PRINT"(RVS)(YEL)(2 RIGHT)DEVASTATOR S 
C:"SC;:IFTI$=>"000030"THEN2000:rem 75 
150 GOTO800 :rem 103 

160 G=2:PRINT"(BLU)@@@@@@@@Q(4 SPACES)P@@ 
@@@@@@@@@@@@@03(4 SPACES}@P@@@@@@@@@@ 
@@@Q@@(4 SPACES)@@P@@@@@@{PUR}@@@"; 

190 PfcINT"@@Q(BLU]@@Q@@@@P@@(PUR)P@@@@@@@ 
@@Q@(BLU)@Q@@@@@@P@(PUR)@P@@@@@@@Q@@ 

{BLU)Q@@@@@@@@P{ PUR) @@P@@@@@Q@@Q" ; 

220 PRINT"@@@@@@@@@@P@@P@@(BLU)@Q( PUR) @@Q 

@@@@@@@@@@@@p@@(blu)p@q@(pur}@q@@@@@@ 

@@@@@@@@p@ (BLU) @P" ; :GOTO800 irejl 228 

250 J=3:PRINT"(PUR)@@@@@@@@Q(4 SPACES)P@@ 
@@@@@@(BLU)@@@@@@@Q(PUR)@(4 SPACES}® 
(BLU }.P@@@@@@@@@@@@@Q@ (PUR}@ ( 4 SPACES) 
@(BLU)@P@@@@@"; :rem 107 

280 PRINT"@@@@@@Q@@(PUR)Q@@@@P(BLU}@@P@@@ 
@@ (PUR)@@@@Q(BLU}@@Q@@@@@@P@@(PUR)P@@ 

@@@@@q@(blu)@q@@@@@@@@p@(pur)@p@@@"; 

:rem 249 

320 PRINT"@@Q@@(BLU)Q@@@@@@@@@@P(PUR)@@P@ 
@@Q@@Q@@@@@@@@@@@@P@@P@(BLU)Q(PUR)@@Q 
@@@@@@@@@@@@@@P@@(BLU)P”; :rem 124 

330 GOTO800 :rem 103 

350 J=4:PRINT"(PUR)@@@@@@@@Q{4 SPACES)P@@ 
@@@@@@@@@@@@@Q@(4 SPACES)@P@@@@@@@ 
(BLU)@@@@@@Q(PUR)@@{4 SPACES)@@(BLU)P 
@@@@@@@"; :rem 50 

380 PRINT■@@@@Q@(PUR)@Q@@@@P@(BLU)@P@@@@@ 
@@@@Q@@(PUR)Q@@@@@@P(BLU)@@P@@@@@@@Q@ 
@q@@@@@@@@P@@P@@@(PUR)@@Q(BLU)@"; ^ 

420 PRINT"@Q@@@@@@@@@@P@@{PUR)P@@@Q@(BLU) 
@Q@@@@@@@@@@@@P@(PUR)@P@Q@@(BLU)Q@@@@ 
@@@@@@@@@@P(PUR)@@P";:GOTO800:rem 244 
500 F=INT(RND(.)*9):IFTI$>=T$THEN1800 


1016 

1019 


3:POKEV,0:PRINT" 


POKE37154,255:IFA=7THEN1080 :rem 55 

ONAGOTO1015,1016,1017,,1018,1019,,,, 
,1020,1021,1022 :rem 34 

R=R+21:GOTO1080 :rem 114 

R=R-23:GOTO1080 :rem 119 

R=R-1:GOTO1080 :rem 68 

R=R+22:GOTO1080 :rem 118 

R=R-22:GOTO1080 :rem 121 

3 R=R+1:GOTO1080 :rem 60 

1 R=R-?1:GOTO1080 : rem 113 

2 R=R+23:GOTO1080 :rem 114 

3 IFR<-44THENR=-44 :rem 206 

5 IFR>44THENR=44 :rem 123 

3 ONJGOSUB500,520,500,520 :rem 5 

0 POKEL+R,219:B=PEEK(37137)AND32:IFBTH 

ENONJGOTO160,250,350,70 :rem 250 

3 IFPEEK((L+R)-1)=130RPEEK((L+R)-l)=21 
ORPEEK((L+R)-1)=24THEN1130 :rem 55 


IFPEEK(( 

HEN1130 
ONJGOTO160,250,350,76 


m 221 


RS=8T0255STEP5:POKE3687 


% SPACES)EE 


1800 PRINTTAB(F)"(4 UP)(YE 

(48 SPACES)":RETURN :rem 214 

1900 PRINTTAB(Y+F)"(YEL)(3 SPACESjEFG 

(51 SPACES)"; :rem 56 

1905 PRINT"{20 SPACES)":RETURN :rem 186 
2000 IFSC>=100THENPRINT"(HOME}(4 DOWN) 

(7 SPACES)(RVS)YOU WIN 1":POKEV,9:F0R 
T=1TO500:NEXT:GOTO3000 :rem 86 

2005 PRINT"(RVS)(10 UP}(3 SPACES)N(UP)N 

(UP}N(UP}(LEFT}M(UP}(LEFT}N(UP)N(UP) 

n(upTn(left)(upTm(left)(upTn(upTn" 

2010 PRINT"(HOME)(RVS)(4 SPACES)IC| 
gF3 16 Bl ED§ EC3(2 SPACES) 

EC3(2 SPACES)EF3(2 SPACES)ED3 
(SPACE)EF| |4 B3(2 SPACES1EF3 
(SPACE}ED3(3 SPACES)EC3";:rem 74 
2020 PRINT"(7 SPACES)ED3(SHIFT-SPACE) 

ED3(SHIFT-SPACE)EC? ":FORT=15TO0 
STEP-1:POKEV,T:FORL=lTOl00:NEXTL:NEX 
TT :rem 78 

2030 PRINT"(RVS}{RED} YOU HAVE FAILED IN 
(7 SPACES}YOUR MISSION!(6 SPACESjEAR 
TH IS DESTROYED!(2 SPACES)" :rem 151 
2040 POKE198,0:PRINT"(RVS)HIT FI 

(2 SPACESjTO PLAY AGAIN." :rem 211 
2050 GETP$:IFP$=""THEN2050 :rem 207' 

2060 IFP$="{FI}"THEN0 :rem 48 

3 IFP$<>"(FI}"THEN2050 :rem 5' 

3 F0RT=8164T07856STEP-1:M=INT(RND(.)*4 

3 PRINT"(RV 































Another alien saucer waits to be destroyed in "Devastator," 


Program 3: 

Devastator - Color Computer Version 

by Charles Brannon, Program Editor 



Color Computer Notes 


Use a joystick plugged into the right port to 
play the Color Computer version of "Devas¬ 
tator" (Program 3). Type the DATA state¬ 
ments carefully; they determine the shape 
and color of the moving trench. The program 
reads the patterns of l's, 2's, and 3's and 
creates three different "views" of the trench, 
using the solid-colored blocks in the character 
set. When these are shown in succession, 
you get the illusion of moving bands. This is 
all made feasible, of course, by the Color 
Computer's very fast PRINTing speed. 

The alien ship is drawn by several sub¬ 
routines; each draws a different-sized ship. 
By erasing and redrawing, the alien ship can 
be made to appear to weave in and out three- 
dimensionally. The alien ship is also drawn 
with relatively low-resolution, quarter- 
square characters. The main program checks 
for a collision between the cross hairs and 
the alien simply by comparing their X,Y 
coordinates. 

You have a limited amount of time to 
shoot the alien. If you take too long (the clock 
counts down to zero), a colored beam blasts 
and reduces the Earth to a smear of colorful 
dots. There's always the next game! 








NEW 128K COMMODORE - 80 COLUMN 


COMPUTER SYSTEM SALE! 

HOME • BUSINESS • WORD PROCESSING 



LIST PRICE 

• B128 COMMODORE 128K 80 COLUMN COMPUTER 995.00 

• 8050 DUAL DISK DRIVE (dyer 1 million bytes) 1795.00 

• 4023 - 100 CPS ■ 80 COLUMN BIDIRECTIONAL PRINTER 499.00 

• 12" HI RESOLUTION 80 COLUMN GREEN OR AMBER MONITOR 249.00 

• SUPER SCRIPT 80 COLUMN PROFESSIONAL WORDPROCESSOR 149.50 


• SUPER BASE PROFESSIONAL DATA BASE 

• BOX OF 10 LORAN LIFETIME GUARANTEED DISKS 

• 1100 SHEETS FANFOLD PAPER 

• ALL CABLES NEEDED FOR INTERFACING 

- TOTAL LIST PRICE 


149.50 


nt options (replace the 4023 with 


[R SYSTEM PACKAGE!! If 
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ENTERPRIZES — : 

BARRINGTON, ILL 


312/382-5244 to 
















































































PROTECTO 

ENT 












my , 

MbsiCak: 


s 



/ Wtey^aigiBr 


7 


Turn Your Commodore-64 Into A 
Sophisticated Musical Instrument 

“The Program That Gives You A Reason To Buy A Commodore-6k. ” 

New York Times. 

I With Musicalc anyone can • Make and record sophisticated music • Print out sheet music from your I 

creations • Turn your computer into a Cord Organ • No Experience Necessary! 7 

To prove it we will send you a Free Record with music created on a Commodore 64 computer and Musicalc I 
1 7 7 j° get your Free Record call Protecto Enterprizes 

MusCalc 


MusiCak: 

1-&—1 


ScoreWriter 


Synthesizer & Sequencer 


MusaCak 


Dr develop your own and re 


List $59.00. Sale $39.95. 


Keyboard Maker 

Turns your Commodore-64 into o 
musical keyboard. Comes with 
over 30 pre set keyboard scales 




PROTECTO 

ENTERPRIZES —> 





















COMMODORE-64 


CHALK BOARD 


COLOR TOUCH TABLET 



Chalk Board Touch-Tablet is 

revolutionary new 12" x 12" touch sensitive 
surface that lets you bypass your 
COMMODORE-64 Computer keyboard. Just 
touch the pad and watch your ideas appear 
on your t.v. screen in living color! Power Pad 
is drawing pad, color graphics, color canvas 
and piano keyboard, jigsaw puzzle, game 
board for any age. A fantastic, entertaining, 


List Price $129.90 


m. $ 59.00 


*i»a#8B«*s»a*8ase8sss' 


First Graders To Senior 
Board • Jigsaw Puzzle 


EHTsKEs 

BiSteVA'd.'JKlif.lSS," 




SKSSSsffiS? 
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TI-99/4A Version Notes 


The TI-99/4A version of "Devastator" (Pro¬ 
gram 4) is written in Extended BASIC and re¬ 
quires a joystick. As the game begins, you are 
cruising above the ominous Devastator. A 
guardian ship from Devastator appears. You 
must eliminate this alien ship and at least nine 
others that follow in a given period. If you fail. 
Devastator blasts Earth with a lethal laser. 

Two levels of difficulty are offered in 
this version. On either level, you can elimi¬ 
nate the guardian ship by simply positioning 
the cross hairs over them using the joystick. 
The main difference between skill levels is 
the size of these guardian ships (which are 
actually sprites). The CALL MAGNIFY state¬ 
ment in line 420 produces ships of two sizes. 
Consequently, on level one, guardian ships 
are large and can be easily destroyed, but 
level two features smaller ships which require 
greater dexterity to eliminate. 

The pritnary game loop for the program 
is from line 450 to 510. The counter W in line 
500 is increased each time through the loop. 
When W reaches 200, the game is over and 
Earth is either blasted or not, depending on 


whether you've destroyed the required 
number of guardian ships. If the game as 
written is just too easy or too difficult for you 
on the skill levels offered, vary the time limit 
(200) to achieve a comfortable level of play. 

The programming techniques used here 
might aid you in writing your own programs 
on the TI. You may notice that program ex¬ 
ecution appears to pause'between the title 
page and the appearance of the playfield 
(background). Actually, the playfield is being 
set up, but since the foreground and back¬ 
ground colors of all characters are defined as 
black, nothing appears at this point because 
the screen color is also black. When all char¬ 
acters on the playfield have been printed, 
color codes are assigned simultaneously 
using the CALL COLOR statement so that 
the entire game field appears at once. 

Another trick, also achieved with color 
coding of characters, gives the game a 3-D 
effect. The Devastator is first printed in lines 
220 to 320, using redefined characters from 
three character sets. By constantly shifting 
the foreground and background colors of 
these character sets in line 450, an illusion of 
movement is produced. Thus, as you watch 
the screen, you feel that you are actually 
circling this colossal ship. 









680 CALL CHAR(100,"0000000003040808 
FF0808040300000080808080E090888 
8FF888890E0808080") 

690 RETURN 

700 REM ALIEN SHIP DESTROYED 

710 CALL DELSPRITE(#2):: CALL MOTIO 

720 CALL*SCREEN(15):: CALL SCREEN(1 
24 STEP 4 :: CALL SOUND(100,-7, 


740 CALL SCREEN(2) 



800 REM EARTH DESTROYED 


810 GOSUB 790 :: FOR 1=8 TO 0 STEP 
-1 :: CALL HCHAR(7+I,25-I,95):: 

CALL COLOR(8,INT(RND*8)+9,1):: 



840 GOSUB 120 :: D1=-100 :: Fl=-6 : 

: F2=110 :: GOSUB 130 :: GOSUB 

120 :: GOSUB 110 :: GOSUB 140 


860 DISPLAY AT<1,23+1):CHR*(133):: 

DISPLAY AT(1,26+J):CHR$(133) 

870 DISPLAY AT(2,22+1):CHR$(133)&CH 

R*(133)&CHR*(133):: DISPLAY AT( 
4,25+J ) : CHR$ ( 133) StCHR* (133) &CHR 




CLEAR :: GOTO 200 



FOR J = 2 TO 8 :s CALL COLOR(J,l 


PRINT "C4 SPACES> D E V A S T A 


ECT" :: PRINT "EARTH FROM THE 
APPROACHING" 

PRINT "DEVASTATOR. SHOOT DOWN 
AT" :: PRINT "LEAST 10 GUARDIA 


" :: PRINT "DESTROY 


COMRADES TO 


CH TO COMPLETE YOUR" 

1090 PRINT "MISSION. POSITION YOUR” 
:: PRINT "CROSSHAIR WITH THE 
JOYSTICK.” 

1100 FOR J =2 TO 8 : : CALL COLOR(J,l 

1110 PRINT :: PRINT "ENTER YOUR SKI 
LL LEVEL(1,2),CAPTAIN?" :: ACC 

1120 LEVEL=5—VAL(LEVELS) 

EVASTATOR IS APPROACH-" 

1150 PRINT "ING. GRAB YOUR JOYSTICK 
," :: PRINT "AND PREPARE TO DO 

1160 FOR 1=1 TO 750 :: NEXT I 
1170 RETURN 

Program 5: 

Devastator - Apple II Version 

byToddKoumrian 

"READING DATA" 


10 GOSUB 8000 








Apple Devastator 

Todd Kopqrian | 

"Devastator" for the Apple (Program 5) is a 
joystick-controlled hi-res game written in 
Applesoft with several machine language 
(ML) subroutines. When playing Devastator, 
you need not hold down the fire button; 
merely placing the cross hairs on the moving 
alien interceptor will insure its destruction. 
However, if you take too long. Devastator will 
have enough time to destroy Earth. 

The cross hairs and the alien interceptors 
are drawn using shape tables. The Applesoft 
SCALE and ROT commands are used to 
create the arrival and explosion of the inter¬ 
ceptors. The shape table is POKEd in at line 
8030 and sits at $300. 

Earth and its subsequent destruction are 
handled by short ML routines. The world- 
draw routine resides at $1900 and is CALLed 
once every loop through the main program 
or whenever the image is garbled. The 
routine stores the bit image on the screen 
memory from a data table at $1980 to $1A6F. 
World-draw OR's the image with what is on 
the screen and then stores it so that it does 
not erase what is already there. 

The destruction of Earth at the end of 
the game is handled by an ML routine at 
$1A70. It stores random garbage in a ran¬ 
domly selected line and byte in screen mem¬ 
ory. Since the routine confines the garbage 
to the area around the image of Earth for a 
number of cycles and then expands it to the 
edges of the screen, the explosion appears to 
expand quickly. The ML random number 
generator used at $1AFF is a common one 
that generates random nybbles and masks 
them together for random byte values. A 
short lookup table is used by both the world- 
draw and world-destroy routines to find 
quickly the addresses of the first 40 lines on 
the screen. The table lies between $1930 and 
$197F; its use has been well documented in 
the past year. 

When you're typing in Devastator for 
the Apple, it is important that the data be 
absolutely correct. If the data for the shape 
tables or the world-image has errors, the 
images will look malformed. If there are er¬ 
rors in the data for the ML routines, the com¬ 
puter will most likely crash or write all over 
your program. If you have a printer, use it to 
check the data, and remember to always 
save your program before you run it. 




4020 Y = PDL <1>: IF Y > 124 THEN Y = 
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IBM Notes: Devastator 


Charles Branron, Program Editor 


The Devastator, an alien ship of incredible 
power, is now approaching the earth. The 
Devastator roams the galaxy, destroying 
planets and absorbing matter-energy transfor¬ 
mations. Unfortunately, it's now Earth's turn 
to be the matter. 

The combined technology of the planet 
has managed to assemble a primitive ship, 
one that can at best discourage the Devastator. 
You are the pilot of that ship, mankind's last, 
best hope. 

You've been briefed thoroughly: The 
Devastator sends out ten ships, one at a time. 
Each ship plants an explosive satellite above 
the earth. After all ten charges have been laid, 
the Devastator detonates them, destroying the 
planet utterly. It didn't expect to encounter 
you, though.... 

You'll need an IBM PC with BASICA (ad¬ 
vanced BASIC), or a PCjr with Cartridge 
BASIC, as well as a joystick, to play "Devas¬ 
tator." After you RUN the game, read the 
instructions to familiarize yourself with the 
game. To begin play, hold the joystick to the 
lower right corner, then press the button. 

This lets the program calibrate itself to your 
joystick (since the range of the joysticks is not 
standard). 

After a pause, while the game is being set 
up (the background colors will change to as¬ 
sure you your machine's not dead), the main 
viewscreen appears, inside dotted lines. 
You're orbiting the massive Devastator. Terra 
Firma is in the upper left corner of the view- 
screen, and a dreaded alien ship is hovering 
about. Move the cross hairs with your joystick, 
center it on the alien, then press fire. If you 
made a hit, the screen will flash red and a 
new alien will appear. But if you miss, the 
alien ship darts away, making it harder to re¬ 
aim. The alien ship will plant its charge after 
ten seconds. However, the more ships you 
hit, the faster they get. 

At first the Devastator hardly notices you, 
but after you begin to destroy the ships, the 
Devastator modifies them to reach Earth faster. 
Every time you hit five ships, future ships will 
reach Earth a second sooner. Your control 
panel shows you a countdown of time re¬ 
maining before the charge is planted. Each 


time an alien lays a charge. Earth will flash, 
and the deadly ring around Earth becomes 
more complete. When ten charges have been 
set. Earth shudders in nil-space, then flashes 
outward at the speed of light. You may not 
have saved Earth, but at least it went out with 
a bang! 

Programming Tips 

The program uses the medium resolution, 
four color mode (SCREEN 1). All the animation 
is done using PUT and GET. First, three views 
of the trench are drawn. Each one starts with 
a different color, so when they are viewed in 
succession, you get the illusion of moving 
bands, which in turn makes you feel like you 
are orbiting the Devastator. Each view is saved 
in an array (with GET), then displayed with 
PUT. The cross hairs, the alien, and the planet 
Earth are also drawn, then nabbed with GET. 

To animate, you must erase the old image, 
redraw the image at the new location, erase, 
draw, etc. In drawing and erasing, though, 
it's too easy to erase the underlying back¬ 
ground. The trick is how you lay down the 
image. If you just place it on the screen, you 
are overlaying and destroying the dots under 
the image. Instead, you can use a quasi- 
mathematical function called XOR (exclusive 
OR) to both draw and erase the ship. Let's 
follow XOR with a binary example. 

Let's say the image is one byte wide and 
one line high: 10101010. This would create a 
dotted line in high resolution, or a colored 
line in medium. Underneath the image might 
be a single dot: 00100000. When the two bytes 
are XOR'd together: 

XOR 00100000 (background) 

10101010 (shape) 

10001010 (new background) 

(The rule for XOR is0XOR0 = 0,0 XOR 1 = 1, 

1 XOR 0 = 1,1 XOR 1 = 0,) 

Now watch the magic as we XOR the 
answer back with the image: 

10001010 (new background) 

XOR 10101010 (original shape) 

00100000 (restored background) 

The image is erased, but the original dot 
is back! The same idea applies to a shape made 
up of lots of bytes. You can XOR it against the 
background, then XOR again to restore the 
background (and erase the shape). 















2160 PRINT"each 


plants a 


2180 COLOR 1:PRINT"it's too late.” 

2190 LOCATE 25,1:C0L0R 31:PRINT"Hold sti 




2205 IF STICK(0)>CX! THEN CX!=STICK(0) 

2207 IF STICK<1>>CY! THEN CY!=STICK(1) 

2208 IF STRIG <1)=0 THEN 2200 
2210 RETURN 

3000 DEF SEG=0:IF (PEEK(&H410) AND &H30) 


3010 SCREEN O:PRINT"Color Adaptor Requir 


0 ON ERROR G 


4030 SCREEN O:COLOR 31,0,0 

4040 PRINT "Advanced BASIC (BASICA) Requ 

ired.":COLOR 7:RESUME 4050 

4050 ON ERROR GOTO O:END 

4060 ON ERROR GOTO O:RETURN 

Program 7: 64 Devastator—BASIC Portion 

by Gregg Peele, Assistant Programming Supervisor 
Refer to the "Automatic Proofreader" article before typing this 
program in. 

50 POKE56,49:CLR :rem 179 

60 PRINT"{CLR}{12 DOWNjSELECT 

{RVS}1{OFF} OR {RVS}2{OFF} PLAYER GAME 
" :rem 84 

70 GETA$:IFA$<"1"ORA$>"2"THEN70 srera 219 
80 POKE828,ASC(A$)-49:POKE829,2 :rem 246 


Notes For The 
64 Version 

The 64 version of "Devastator" uses ma¬ 
chine language, coupled with sprite and 
character graphics, to produce a realistic bat¬ 
tle scenario. You must defend the earth 
against all invaders. To insure the earth's 
safety, you must strike your opponent's ship 
at least once every ten seconds. Failing this 
challenge will place the earth in imminent 

Several options for game play are avail¬ 
able. Initially, you may select either a one- 
or a two-player game. The one-player game 
pits you against a computer-controlled ship. 
This ship evades your attack with random 
movements. Choosing the two-player op¬ 
tion pits you against an opponent who is 
actively avoiding your attack. 

Player one (in either the one- or two- 
player game) must use a joystick in port 2 to 
move a crosshair around the screen. (In the 
two-player game, player two controls the 
alien ship with a joystick in port 1.) When 
the crosshair comes in contact with the alien 
ship, you must fire to achieve a successful 
strike against the opposing ship. Ten points 
are awarded for each successful strike. A 
score of 1000 will save the earth. 

The game has three levels of difficulty. 
You can change levels at any time by press¬ 
ing the top three function keys. The fl key 
gives the lowest level, f3 the second highest, 
and f5 the most difficult level. The 
SHIFT/LOCK key can be used to increase or 
decrease the size of your crosshair, which 
also affects the difficulty of the game. 

To use Devastator for the 64, you must 
first enter Program 8 using MLX. The start¬ 
ing address for this program is 49152 and 
the ending address is 50891. After saving 
this program, type in Program 7 and save it. 
To run Devastator, first load the program 
that you created with MLX like this: 

for disk, or 

for tape. Then type NEW (hit RETURN) and 
load and run Program 7. 







100 POKE53281,01POKE52992,01POKE646,11POK 
£53275,8 : rem 40 

120 SI= 54272 :FOR T= SI TO SI+24:POKET,0: 

NEXT ! rem 32 

125 POKESI+24,15:POKESI+5,17sPOKESI+6,245 
:POKESI,100iPOKESI+1,100 :rem 140 

150 PRINT 14 {CLR} 44 * FOR T= 1030TO1444STEP 41 
t POKET,223:POKET+54272,1:NEXT:rem 195 
200 FOR T= 1057TO 1484STEP 39:POKET,233 IP 
OKET+54272,1:NEXT irem 54 

250 FOR T= 1991TO 1624STEP-39:POKET,105:P 
OKET+1,2331POKET+54272,1 ■ rem 205 

300 POKET+54272+1,1:NEXT :rem 119 

350 FOR T= 2016TO1624STEP-41:POKET,95:POK 
ET-1,223:POKET+54272,1 :rem 149 

400 POKET+54272-1,1:NEXT :rem 122 

450 FOR T= 1480 TO 1480+120STEP40:POKET,1 
60:POKET+54272,l:POKET+7,160 :rem 87 

500 POKET+54279,1:NEXT :rem 36 

550 J=1023:Z=J:A=1:TR=40:GOSUB 600:J=1064 
:Z=J:A=-l:TR=40:GOSUB 600:GOTO800 

: rem 85 


T:SYS49152:POKE52992,0:G 


Program 8: 


700 POKEJ,160:POKEJ+54272,1 
750 GOTO600 :rem 107 49254 

800 CL=12:FORT—1640TO 2023:M=PEEK(T):IFM< 49260 
>32ANDM<>233ANDM<>223THEN1050 : rem 137 49266 

850 IF M=32THENPOKET,247 :rem 150 49272 

900 IFT>1754 THEN CL=15 :rem 236 49278 

950 IFT >1868 THEN CL=1 :rem 194 49284 

1000 POKET+54272,CL :rem 46 49290 

1050 NEXT : rem 5 49296 

1150 FOR T= 1600TO2023:IF PEEK(T)=32 THEN 49302 
POKET+54272,12 :rem 21 49308 

1200 NEXT :rem 2 49314 

1210 SYS49152:PRINT"(HOME){10 RIGHT}SCORE 49320 
" :rem 132 49326 

1250 SYS49200:SYS49424:IF PEEK(52992)=255 49332 

THEN 1283 :rem 38 49338 

1260 IF PEEK(52992)=1THEN1275 :rem 69 49344 

1270 GOTO 1250 :rem 203 49350 

1275 SYS50871 :rem 211 49356 

1280 PRINT"{HOME}{13 RIGHT){2 DOWN}{WHT}Y 49362 
OU SAVED THE{DOWN}{9 LEFT}EARTH":GOT 49368 
01287 :rem 239 49374 

1283 POKE 54276,129:FOR T= 200 TO 202-.POK 49380 

E2043,T:POKE542 7 3,RND(0)* 60+40 49386 

:rem 24 49392 

1284 F0RG=1T0 254:POKE54273,RND(0)*60+40: 49398 

-----+21,0 :rem 18 49404 

» 1T01500:NEXT 49410 

:rem 147 49416 

1286 PRINT' 4 {HOME} [13 RIGHT}{2 DOWN}{WHT}T 
HE EARTH HAS{B0WN}{14 LEFT}BEEN DEST 


PRINT"{CLR}":POKES 3248+21,0:E 


? PEEK(T)<160 T 


Programming Supervisor 











,096,000,094 


000,000,000,000,000,000,188 


003,192,000,003,192,000,1 


3,000,020,000,000,1 


085,000,001,085,0 


150,144,001,085,064,000,0 

000,000,000,000,000,000,1 


000,000,000,000,000,000,1 


4,000,000,024,000,248 


5,255,255,255,255,236 


3,141,003,249 


L,240,207,013 


9,007,169,010,165 


141,239,207,120,169,110,056 


032,126,194,162,001,032,147 


208,169,014,141,248,007,149 

169,007,141,039,208,169,101 

010,141,040,208,169,015,213 


L,005,208,173,000,208,1 
L,004,208,173,016,208,1 
L,001,240,011,169,004,1 


248,207,208,024,169,255,033 


018,212,173,027,212,041,129 

007,141,246,207,173,215,185 

207,141,248,207,173,246,168 

207,168,185,240,194,076,022 


49968 

49974 

49980 

49986 

49992 

49998 

50004 

50010 

50016 

50022 

50028 

50034 

50040 

50046 

50052 

50058 

50064 

50070 

50076 

50082 

50088 

50094 

50100 

50106 

50112 

50118 

50124 

50136 

50148 

50154 

50160 

50166 


50184 

50190 

50196 

50208 

50214 

50220 

50226 

50232 

50238 

50244 

50250 

50256 

50262 


50280 

50286 

50292 

50298 

50304 

50310 

50316 

50322 

50328 

50334 

50340 

50346 


5352 


109,195 

072,096 

187,: 

191\196 
169,120 
010,056 


207,144 
034,173 
141, r' 
157,000 


208,009 

189,224 

096,173 

141,016 















































































50370 :195,096,032,047,196,096,088 
50376 :032,130,195,032,047,196,064 
50382 :096,032,148,195,032,047,244 
50388 :196,096,032,148,195,032,143 
50394 :166,195,096,032,130,195,008 
50400 1032,166,195,096,096,173,214 
50406 :030,208,141,242,207,206,240 
50412 :240,207,024,173,240,207,047 
50418 :105,030,141,001,212,173,136 
50424 :240,207,240,003,076,078,068 
50430 :197,169,000,141,033,208,234 
50436 :141,032,208,169,003,141,186 
50442 :240,207,173,000,220,041,123 
50448 :016,240,013,169,013,141,096 
50454 :249,007,169,001,141,244,065 
50460 :207,076,078,197,173,244,235 
50466 :207,240,041,169,008,141,072 
50472 :004,212,169,033,141,004,091 
50478 :212,169,032,141,004,212,048 
50484 :169,000,141,244,207,173,218 
50490 :242,207,041,001,240,014,035 
50496 :206,239,207,169,002,141,004 
50502 :033,208,141,032,208, 032,212 
50508 :091,197,169,002,197,161,125 
50514 :208,006,169,088,197,162,144 
50520 : 240,041,096,169,202,141,209 
50526 :249,007,169,020,141,240,152 
50532 :207,032,157,198,173,239,082 
50538 : 207,240,001,096,169,010,061 
50544 :141,239,207,206,215,207,047 
50550 :173,215,207,201,003,144,037 
50556 :001,096,169,001,076,133,088 
50562 :197,169,255,141,000,207,075 
50568 :120,169,049,141,020,003,126 
50574 :169,234,141,021,003,088,030 



50580 :096,160,000,185,221,197,239 
50586 :153,000,050,200,192,193,174 
50592 :208,245,169,008,013,021,056 
50598 : 208,141,021,208,169,160,049 
50604 :141,006,208,169,060,141,129 
50610 :007,208,169,008,013,029,100 
50616 :208,141,029,208,013,023,038 
50622 :208,141,023,208,013,028,043 
50628 :208,141,028,208,169,014,196 
50634 :141,037,208,169,005,141,135 
50640 1038,208,169,003,141,042,041 
50646 :208,169,200,141,251,007,166 
50652 1096,000,000,000,002,169,231 
50658 1000,002,254,064,011,255,044 
50664 :144,043,255,208,042,255,155 
50670 :164,170,254,169,170,190,075 
50676 :169,170,186,169,186,186,030 
50682 1169,170,254,169,170,254,156 
50688 :173,043,255,180,042,255,180 
50694 :180,042,254,180,010,254,158 
50700 :144,002,185,064,000,169,064 
50706 :000,000,000,000,000,000,018 
50712 :000,000,000,000,000,000,024 
50718 :000,000,000,136,000,000,166 
50724 :254,000,011,207,128,011,135 
50730 :255,192,002,207,036,034,000 
50736 :254,040,040,188,169,042,013 
50742 :050,169,128,000,000,170,059 
50748 :014,169,034,062,044,008,135 
50754 : 252,132,040,207,048,002,235 
50760 :254,128,002,206,000,002,152 
50766 :185,000,000,000,000,000,007 
50772 :000,000,000,000,000,000,084 
50778 :000,000,000,000,000,000,090 
50784 :000,136,000,000,012,000,244 
50790 :008,000,128,011,000,192,185 
50796 :000,003,004,034,050,000,199 
50802 :000,188,160,032,002,008,248 
50808 :000,000,000,128,000,136,128 
50814 :034,062,044,008,000,132,150 
50820 1000,192,048,000,192,128,180 
50826 :002,000,000,000,184,000,068 
50832 :000,000,000,000,000,000,144 
50838 :000,000,000,000,000,000,150 
50844 :000,169,000,133,160,133,239 
50850 :161,133,162,024,169,010,053 
50856 :109,216,207,141,216,207,240 
50862 :173,217,207,105,000,141,249 
50868 :217,207,096,160,024,162,022 
50874 :000,024,032,240,255,173,142 
50880 :217,207,174,216,207,032,221 
50886 :205,189,096,013,013,013,215 


Q 


\ferbatim 

flexible disks 



START USING YOUR COMPUTER FOR 

FUN and PROFIT! 
































































■ - 4 CV 7" 72,, 

JACKPOT^ 


Rick Rothstein 


Afoio you chh experience the thrill of slot machines 
without the danger of losing your money. These pro¬ 
grams will show you how the bandits work and also 
how difficult it really is to hit a jackpot! Versions 
for TI-99/4A with Extended BASIC, Commodore 64, 
VIC-20, Atari, and IBM PC/PCjr (Color/Graphics 
Monitor Adapter required on PC). 


Have you ever been to a casino in Las Vegas or 
Atlantic City? If so, your first visit probably left 
you dumbstruck over the sheer number of slot 
machines waiting to take your money. These 
nefarious one-arm bandits dazzle you with bright 
lights and promises of instant wealth. 

A recent trip to Atlantic City—and an un¬ 
profitable encounter with some of these ma¬ 
chines—prompted me to write "Jackpot." The 
program features three very different playing 
levels. Level one offers true casino odds; level 
two offers very generous odds which gives the 
player roughly the same odds that a casino nor¬ 
mally enjoys; and level three will, in the long 
run, make you the owner of the casino. 

Frustrating Experiences 

After you experience the frustrations of playing 
against the legitimate odds of level one, level 
two should give you a small measure of satisfac¬ 


tion if you play it long enough. Level three was 
included for you to play after you discover that 
level two, although tilted in your favor, is not 
overly generous. 

Colorful graphics are used to display a 
payout chart, your current monetary status, and 
three large windows through which cherries, 
limes, plums, bells, bars, or lucky sevens will 
show. The shape displayed in each window is 
picked at random from 20-position wheels 
containing the above six shapes scattered ran¬ 
domly around them. The number of times each 
shape appears on each wheel was selected to 
produce the desired odds for each level of play. 

Payout? 

Before play begins in the TI version, the number 
1 is displayed in each window, and the prompt 
ENTER LEVEL appears under the payout chart. 

If you press the space bar, the displayed level 
number will change. Press ENTER to begin the 
game at the displayed level. The payout chart 
continually prompts you to press the letter P to 
play and S to stop (the game). In addition, press¬ 
ing AID (FCTN-7) will allow you to enter a new 
level of play, and pressing REDO (FCTN-8) will 
reset your money status to even while retaining 
the same level of play. 

This program is written in Extended BASIC, 






and because it uses both upper- and lowercase 
letters, it can only be typed into a 99/4A con¬ 
sole. However, once the program is recorded on 
tape or disk it will load and run properly on the 
older 99/4 console. 

In order to facilitate use of the automatic 
NUMBERing command built into the 99/4A, the 
line numbers for the program logic begin at line 
100 and increase in increments of ten. (Except for 
the introductory REMarks, all other REMark 
statements have line numbers ending in five and 
may be omitted.) 

A Character Of Its Own 

One of the strongest features of the 99/4A is its 
ability to display high-resolution graphics and up 
to 16 colors simultaneously. This program makes 
excellent use of these features by using seven dif¬ 
ferent colors and redefining all 112 Extended 
BASIC characters which make up the highly de¬ 
tailed displays. 

Although the program logic and mathemat¬ 
ical theory of slot machines will not be ex¬ 
plained, here are some of the programming 
techniques used in the TI version: 

Line 120 sets the foreground and back¬ 
ground colors of character set 0, which contains 
the cursor symbol and the edge character, to the 
same color and then fills the screen with the 
cursor symbol. Although the characters in this set 
cannot be redefined, turning the foreground and 
background to the same color has the same effect 
as redefining them to solid blocks of color. Filling 
the screen with one of these characters produces 
a solid background color which is independent of 
any other character—something the blank char¬ 
acter cannot do. 

After all of the characters have been re¬ 
defined, they are combined into strings and 
placed on the screen with the DISPLAY AT com¬ 


mand of Extended BASIC. This is a much faster 
way to place graphics on the screen than using 
the CALL HCHAR or CALL VCHAR 
subprograms. 

The first statement in line 170 uses a ran¬ 
dom number, from the sequence that RAN¬ 
DOMIZE generates, for each loop in which either 
no key or an unrecognized key is pressed. This 
technique insures that the sequence of plays will 
not be repeated, since the time period between 
recognized keypresses will vary from play to 
play and from person to person. 

Sluggish Sprites 

Most programmers who work in Extended BASIC 
think sprites are useful only when they move. 
Actually, they can be very handy if placed on the 
screen and left stationary. In this program, one 
sprite, doubled in size by the CALL MAGNIFY 
(2) subprogram, is placed in front of each win¬ 
dow. They serve as level-of-play indicators and 
are left transparent during game play. When 
needed, a simple CALL COLOR makes them vis¬ 
ible. The advantage of using sprites in this 
particular application is that characters (numbers 
in this case) defined in an area measuring two 
characters by two characters are displayed with 
no additional character redefinitions. (Remember, 
all 112 Extended BASIC characters were re¬ 
defined and used for the display graphics.) With¬ 
out sprites, 12 additional character redefinitions 
would have been necessary to create the three 
large-sized numbers needed for the level-of-play 
indicator. 

If you wish to save the time and effort of 
typing this program in, I will be glad to make a 
copy for you (TI version only). Just send $3, a 
blank cassette or disk, and a self-addressed, 
stamped mailer to: 

Rick Rothstein 

P.O. Box 4169 

Trenton, NJ 08610 


Program 1: TI-99/4A Jackpot 

99 REM EXTENDED BASIC REQUIRED 


100 CALL CLEAR :: CALL SCREEN*i2)s: 

CALL COLOR(0,12,12):: CALL HCH 



130 RANDOMIZE :: LEVEL=49 :: TOTAL= 
0 :: OPTION BASE 1 :: DIM SHAPE 


135 REM ** P,S OR AID PRESSED ** 

140 RANDOM=RND :: CALL KEY(0,KEY,ST 

























CALL CHAR(32,"FFFFFFFFFFFFFFFF" 

,40,"00000000001C3E7F0000000078 
FCFEFE7FFFFFFFFFFFFF7FC0F0F8F8F 

CALL CHAR(44, "030FIF 1F3F3F3F3FF 
FFFFFFFFFFFFEFE7F3F3F0F03000000 
F8F8F0E08”) 

CALL CHAR(48,"00384444444438000 
0103010101038000038440810207C00 
00384418044438") 

CALL CHAR(52,"00081828487C08000 
0784078044438000038407844443800 
007C040810202") 

CALL CHAR(56,"00384438444438000 
03844443C04780000000000003F3F3F 

CALL CHAR(60,"3F3F3F0000000000F 
CFCFC00000000000038543018543800 
FFFFFFFFFFFFFFFF") 

CALL CHAR(64,"00381010101038000 
03844447C444400003C223C22223C00 
00446454544C44") 

CALL CHAR(68,"00784444444478000 
07C407840407C000040404040407C00 

CALL CHAR(72,"1F1F0F0300000000F 
CF8F0C000000000183C7E7E7E3C1800 
FFFFFFFFFFFFFFFF"> 

CALL CHAR(76,"00000707040000000 
000F8F8183030600000000101010000 
60C0C080808") 

CALL CHAR(80,"00784444784040000 
0444428101010000078444478484400 
00384430084438") 

CALL CHAR(84,"007C1010101010000 
0444444444438000044444444281000 

CALL CHAR(88,"FFFFFFFFFFFFF8F8F 
FFFFFFFFFFF0000FFFFFFFFFFFFFEFC 

CALL CHAR(92,"FCF8F0E0C0C080803 

),96,"FF7F1F0700000000FFFFFFFFF 
F000000FFFEF8E000000000FFFFFFFF 

CALL CHAR(100,"0000030F1F1F3F7F 
0000C0F0F8F8FCFE7F3F1F1F0F03000 
0FEFCF8F8F0C") 

CALL CHAR(104,"00030F1F3F7FFFFF 
00C0F0F8FCFEFFFF010101030307070 
7808080C0C0E0E0E") 

CALL CHAR(108,"070F0F0F0F0F0F07 
E0F0F0F0F0F0F0E0070707030301010 
1E0E0E0C0C08080808") 

CALL CHAR (11,2 j '* FFFF 7F 3F IF 0F 0 3 0 0 
FFFFFEFCF8F0C000FFFFFFFFFFFFFFF 

CALL CHAR(116, "000080E 0 F 0 F 0 F 8 F8 
IF1F0F0F07010000F8F8F0F0E080000 

CALL CHAR(120,"FCFEFEFFFFFFFFFF 
0 0 0 0 0 0 0 0 0 0C 0 F 0 F 8 0 0 0101010103070 
70080808080C0E0E") 

CALL CHAR(124,"07070F1F3F3F0000 
E 0 E 0 F 0 F 8 F C F C 0 0 0 0 C 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
00000003") 


550 CALL CHAR(136,"000000FFFFFFFFFF 
00000000E0F8FEFF01030307070F0F1 
F 80C0C0E0E0F0F 0F8") 

560 CALL CHAR(140,"1F3FFFFFFFFF3F1F 
F8FCFFFFFFFFFCF81F0F0F070703030 
1F8F 0F0E0E0C0C08") 

565 REM ** CREATE SHAPES ** 

570 SHAPE* (1,1) ="ww"S < CHR$ (128) &CHR* 



580 SHAPE*(1,4 > =”* +w,-" : : SHAPE*(1 
,5)="./wHI" :: SHAPE*(2,1)="w"& 
CHR*(135)&CHR*(136)&CHR*(137)&" 


590 SHAPE*(2,2)=CHR*(138)&”ccc"&CHR 
*(139):: SHAPE*(2,3)=CHR*(140)& 
” ccc "2<CHR* ( 141 ) : : SH APE* ( 2,4 > =C 

600 SHAPE*(2,5)="w'abw" :: SHAPE*(3 

HAPE*(3,4)="nrrro" :: SHAPE*(3, 
610 SHAPE*(4,1)="ww!ww" :: SHAPE*(4 

SHAPE*(4,5)="' (3 SPACES> x" 

620 SHAPE*(5, 1)="wwwww" :: SHAPE* (5 
,2)="?????" :: SHAPE*(5,3)="?BA 

R?" :: SHAPE*(5,4)="?????" :: S 




DISPLAY AT(15,2)SIZE(25):"wJJJJ 



< = w >14 w wNONON□w > 20 0 w" :: DISPLA 



1,LEVEL,1,29,53,#2,LEVEL,1,29,1 
REM *1 PUT SHAPES ON WHEEL ** 
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REM ** ORDER OF SHAPES ** 

DATA 25312364245314253234,14216 
313156425213132,234243254243642 

512136423146352,243524635234235 

DATA 52134646121531536241,56231 
534146213125645,234562463562543 



(7 SPACES}2" :rem 59 

100 A=RND(1):A$="":GETA5:IFA$ < > " P" ANDA? < > 
"E"THEN100 :rem 75 

110 IFA$="E"THENPRINT" {CLR} " : POKE36869,24 
0:END :rem 43 

115 T$="(DOWN}{2 SPACES}{UP}{2 LEFT} 

{2 SPACES}{DOWN}":GOSUB210:GOSUB220:G 
OSUB220:PRINTY?"{UP}{21 SPACES}" 

120 W=0:H=0:N=1:GOSUB200:GOSUB210:GOSUB26 
0:N=2:GOSUB200:GOSUB220:GOSUB260 

: rem 10 

140 N=3:GOSUB200:GOSUB220:GOSUB260:rem 63 
145 F0RA=1T024STEP2:H$=STR$(H):H$=RIGHT$( 
H?, (LEN (H$)-1)) :rem 249 

150 K=LEN(P$(A)):IFP?(A)=LEFT$(H?,KJTHENW 
=VAL(P$(A+1)) :rem 60 

160 NEXT:IFW>0THENPRINTY?"{UP}{2 SPACESjY 
OU WIN"W-l"DOLLARS":GOSUB280 :rem 187 
170 TT=TT-1:1FTT>0THENTT$ =STR$(TT)+" 

{2 SPACES}":PRINTY?"{4 SPACES} TOTAL N 
OW "TT?;:POKE198,0:GOTO100 :rem 145 
180 PRINTY?"{UP}{4 SPACES}YOU ARE BROKE" 

190 PRINT"{3 SPACES}PLAY AGAIN{2 SPACESjY 

195 GET A?:IFA? <> "Y"ANDA? <>"N"THEN195 

:rem 59 

197 IFA$="Y"THENTT=50:GOTO20 :rem 189 

198 PRINT"{CLR}":END :rem 23 

200 A=INT(RND(1)*17)+1:B=G% (N, A):T?=F?(B) 

:H=H*10+B:RETURN :rem 214 

210 PRINT”{HOME}{4 DOWN}{6 RIGHT}”T?;:RET 


B20 TOTAL*=STR*<ABS(TOTAL)):: LENGT 
H=LEN(TOTAL*):: C0LUMN=6+(TOTAL 
>0)-INT(.5 +LENGTH/2 > 

B30 IF TOT AL >0 THEN DISPLAY AT(24,C 
OLUMN)SIZE(20+LENGTH):CHR*(30)& 
"Q0UwARE«WaCC3CGw>''&TOTAL*&RPT* 

840 IF T O T A L < 0 THEN DISPLAY AT(24,C 

"Q0UwAREwF0S3CGw>''8<TOTAL*8<RPT* ( 
CHR*(30),4):: RETURN 

Program 2: vie Jackpot 

by Kevin Mykytyn, Editorial Programmer 

Refer to the "Automatic Proofreader" article before typing this 

10 POKE52,28:POKE56,28:POKE51,0:POKE55,0: 

GOSUB300 : rem 158 

20 PRINT''{CLR}"; :FORA—1T04:F0RB=1T022:PRI 
NTNEXT:NEXT :rem 248 

30 F0RA=1T02:PRINT"@@@@@@{2 SPACES}@@ 

{2 SPACES}@@{2 SPACES}@@@@@@";:NEXT 

40 FORA—1T03:F0RB=IT022:PRINT;:NEXT:NE 


0 PRINT"{UP}{2 RIGHT}"T$;:RETURN 

:rem 253 

0 POKEV,150:F0RA=1T030:NEXT:POKEV,0:1FN 
< 3THENF0RA=1T0RND(1)* 200:NEXT:rem 210 

0 F0RQ=1T0W:TT=TT+1:TT?=STR?(TT)+" 

{2 SPACES}":PRINTY$"{4 SPACES}TOTAL N 
OW “TT?::POKEV1,220 :rem 220 

0 FORA=lTO110-W:NEXT:POKEV1,0:NEXT:RETU 

0 PRINT"{CLR}{3 DOWN}{2 SPACES}LOADING 
{SPACE}CHARACTERS" :rem 8 

5 DIMG%(3,17):F0RA=1T03:F0RB=1T017:READ 

0 DATA1,2,3,4,'5,6,7,5,7,3,4, 5,6,7,3,2,3 
0 DATA1,2,3,4,5,6,7,5,7,3,4, 5,6,7,3,6,3 
0 DATA1,2,3,4, 5,6,7,5,7,3,4, 5,6,7,3,2,3 
0 DIMP?{24):F0RA=1T024:READP$(A):NEXT 
0 DATA4,3,44,6,444,16,555,11,661,11,666 


50 PRINTB$V$B$V$B$" 100 “V$B$V$B$" 

{4 SPACES}50":PRINTS$V?S$V?S$" 

{2 SPACES}50 "V$S?V$S$"{4 SPACES}25" 

70 PRINTBE?V$BE$V$BE$" {2 SPACES}18 ”V$BE? 

V?BE?V$B$"{2 SPACES}10" :rem 101 

80 PRINTC$V$C$V$C?"{2 SPACES}15 "V$C$V$C? 
"{5 SPACES}5 ":PRINTV$P$V$P$V$P$" 

{2 SPACES}14 "V$P$V$P?V$B$"{2 SPACES}1 

95 PRINTL?V$L$V$L$'* {2 SPACES} 10 "V$C$" 


,PEEK(I+C):NEXT:POKE36869,255:rem 199 
410 READB:IFB=-1THEN430 :rem 95 

420 FORI=0TO7:READC:POKE7168+B*8+I,C:NEXT 
:GOTO410 :rem 24 

430 B$="{RED}%&{DOWN}{2 LEFT}'(":S$=“ 
{RED}l-{DOWN}{2 LEFT}#$":L$="{GRN} 
{DOWN} {2 LEFT} >7" :C$=" {RED}Z{ [DOWN} 

{2 LEFT}:;":P$="{PUR}£]{DOWN} 

440 BE$="{YEL})*{DOWN}{2 LEFT}+,":LE$=" 

{YEL}f4{DOWN}{2 LEFT}>7":U$="{UP} ":V 
















1 , 2 , 3 , 4 , 5 , 6 ,- 


7 , 7 , 3 , 4 , 5 , 6 , 7 , 5 , 6 , 7 ^ 




DATA115,145,34,75,209,34,73,222 



345 

350 

375 

390 

410 

415 

430 

440 

465 

470 

475 

495 

510 

515 

525 

535 

540 

545 

570 

575 

585 








DATA127, 


.255,254,255,255,255,127,255 

605 DATA254,63,255,252,31,255,248,15 

:rem 38 

610 DATA255,240,3,255,192,0,255,-16,255 

615 DATA24,60,60,60,126,255,255,24 

:rem 185 

620 DATA127,3,6,12,24,24,24,0 srem 174 

625 DATA0,255,129,255,255,129,255,0 


630 DATA0,0,60,126,255,126,60,0 :rem 17 
635 DATA4,8,60,126,255,126,60,0 :rem 34 
640 DATA8,20,38,111,255,246,96,0 ;rem 87 
645 DATA169,0,141,176,2,141,177,2:rem 138 
650 DATA141,178,2,173,176,2,208,16 

655 DATA206,167,2,208,11,173,168,2 


660 DATA141,167,2,162,0,32,234,192 
665 DATA173,177,2,208,16,206,169,2 
670 DATA208,11,173,170,2,141,169,2 


5 DATA162,4,32,234,192,173,178,2 
0 DATA208,16,206,171,2,208,ll,173 em 


685 DATA172,2,141,171,2,162,8,32 :rem 84 
690 DATA234,192,238,173,2,208,188,238 

695 DATA61,3,173,61,3,201,2,208 :rem 32 
700 DATA178,169,0,141,61,3,169,128 


705 DATA141,11,212,238,168,2,208,5 
710 DATA169,255,141,168,2,173,168,2 
715 DATA201,112,144,22,173,176,2,208 



Notes For The 
Commodore And 
IBM Versions 

The VIC-20 version of "Jackpot" (Program 

2) plays the same as the TI version, but does 
not offer a choice of different levels at the 
beginning of the program. The faces of each 
of the three wheels are numerically repre¬ 
sented in the DATA statements in lines 
310-330. A 1 represents a bar, 2 is a seven, 

3 a bell, 4 a cherry, 5 a lime, 6 a plum, and 
7 a lemon. To change the odds, simply 
change the numbers in the DATA state¬ 
ments. For example, if you change all the 
numbers in the DATA statements to 1, you 
will always spin triple bar. 

The Commodore 64 version (Program 

3) is very different from the other games. 
Using a machine language subroutine and 
colored sprites, a smooth spinning effect is 
created. A total of six sprites are used (two 
for each window). The different shapes are 
displayed by changing the sprites' data 
pointers. 

You can alter the odds, in the same way 
as the VIC version, by changing the num¬ 
bers in the DATA statements in lines 
155-165. 

The IBM version of Jackpot (Program 4) 
uses the graphics PUT and GET commands 
to display various shapes on the screen. To 
run this program, therefore, requires either 
Cartridge BASIC (PCjr) or BASICA and the 
Color/Graphics Adapter (PC). The rules are 
the same as for the TI version, but the pay¬ 
offs are slightly different. In the IBM ver¬ 
sion, you begin, with $100. If you want to 
change the odds, change the numbers in the 
DATA statements in lines 1310-1330. 


755 DATA2,233,172,2,208,5,169,255:rem 149 

760 DATA141,172,2,173,172,2,201,112 

765 DATA144,22,173,178,2,208,17,173 

770 DATA9,208, 201,48, 208,10,169, li^ 1 ” 

:rem 245 

775 DATA141.il,212,169,1,141,178,2 

:rem 183 

780 DATA24,173,176,2,109,177,2,109 

:rem 195 

785 DATA178,2,201,3,240,3,76,11 :rem 34 

790 DATA192,96,160,2,254,1,208,189irem 202 




805 DATA80, 3,74,170,189,65,193,133 

:rem 202 

810 DATA251,254,62,3,189,62,3,201:rem 133 
815 DATA17,208,5,169,0,157,62,3 irem 43 
820 DATA168,177,251,174,80,3,157,248 

825 DATA7,56,233,240,168,185,58,193:rem 4 
830 DATA157,39,208,104,170,104,168,169 

835 DATA48,157,1,208,232,232,136, 

840 DATA179,96,2,2,7,2,5,4 
845 DATA7,0,17,34 
850 B=0:POKES+5,9:POKES+6,9 



DATA133, 

















































860 POKE 53277,255-255*B:POKES+1,A:POKES+ 
4,33:FORTD=lTO20:POKES+4,32 :rem 220 
865 FORTD=1TO20:NEXT:NEXT:POKES+4,32:POKE 
S+l,0:POKES-992,6:POKES-991,1:RETURN 
:rem 153 

Program 4: PC/PCjr jackpot 

by Kevin Mykytyn, Editorial Programmer 

10 DEFINT A-Z:SCREEN Is KEY OFF 
20 DEF SEG=0:POKE 1047,64 
30 BOSUB 430s DIM A(E)sA(0) = 

1=2 TO E:READ A(I):NEXT 
40 GOSUB 430s DIM L(E)sL(0) = 

1=2 TO EsREAD L(I):NEXT 
50 GOSUB 430s DIM B(E):B(0) 

1=2 TO EsREAD B(I)sNEXT 


310 POKE 1050,PEEK(1052):GOTO 230 

320 FOR J=1 TO RND(1)*6+5: K=INT(RND(1)*1 

7)+1s ON G(WH,K) GOSUB 330,340,350,360,37 

0,380,390:SOUND 20*K+37,.1:FOR TD= 1 TO 

J*40:NEXT:NEXT:H=H*10+G(WH,K):RETURN 

330 PUT (X,Y),B,PSETsRETURN 

340 PUT (X,Y),S,PSET:RETURN 

350 PUT (X,Y),A,PSET:RETURN 

360 PUT (X,Y),CH,PSET:RETURN 

370 PUT (X,Y),L,PSET:RETURN 

380 PUT (X,Y),CA,PSET:RETURN 

390 PUT (X,Y),BN,PSET:RETURN 

=1 TO 25:T=T+4:GOSUB 420:NEXT:RETURN 

531 TO 1540:SOUND B,.1:NEXT:NEXT:RETURN 
420 LOCATE 1,5:PRINT "Winnings "T-100" 

":LOCATE 1,25:PRINT "Total "T" ":RETURN 


>2 TO EsREAD B 
COLOR O,2sCLS:GOSUB 1300sT=100 
LINE (76,20)—(112,50),2,B:LINE (142, 
20)-(178,50),2,B:LINE (208,20)-(244,50), 

120 PUT (10,75),S:PUT (50,75) 

5),SsPUT (200,75),S:PUT - 

30 PUT (10,100) ,CH:PUT (! 

), 100),CH:PUT (200,100) 


0,125),L:PUT (200,125),C 
,150), A: PUT (200,150),#: 


0 A$=INKEY*:I 


StH80,StHAOO,StH# 

A, &HAA, StHAAOO. 


StH40, StH 17, StHO, StH 1400 , StHO, StHO, StH 
StHO, StHO, StHO, StH 100, 8tH40, StHO, StHO, 
StHA06A, StHO, StHO, StHAA2A, StHA8AA, StH 
>, StH200, StHAAAA, StHAAAA, 
StH2A00, StHAAAA, StHAAA 
StHAAOO, StHAAAA, StHAAA 
StHAAOO, StHAAAA, StHAAA 



GOSUB 320:X=211:WH=3:GOSUB 320 
270 FOR A=1 TO 24 STEP 2:H*=STR*(H):H*=R 


280 L=LEN(P*(A)):IF P*(A)=LEFT*(H*,L) TH 






530 DATA StHAAAA, StHAA 
A, StHAA, StH2A00, StHAAAA 
540 DATA StHAAAA, StHAS 
A, StHA8, StHAOO, StHAAAA 
550 DATA StHAAAA, StHAO 
, 8tH80, StHO, 8tHAAAA 


560 DATA StHAAAA, StHO, 

O, StHO, StHAAOA 

570 DATA StHAOAA, StHO, 



StHAAOO, StHAAAA, StHAAA 
8tH2AOO, StHAAAA, StHAAA 
StH200, StHAAAA, StHAAAA 
StHO, StHAA2A, StHA8 A A, StH 
StHO, StHA800, StH2A, StHO, 

. StHO, StHO, StHO, StHO, StHO, St 


501 

600 DATA 8tH4055, StHO, StHO, StH5515,StH5455, StH 
O, StHlOO, StH5555 

610 DATA StH5555,StH40,8tH1500,StH5555,StH555 
5, StH54, StH5500, StH5555 

620 DATA StH5555,StH55,StH5501,8tH5555,8tH555 
5, StH4055, StH5505, StH5555 

630 DATA StH5555,StH5055,8tH5515,8tH5555,8tH5 
555, 8tH5455, 8tH5555, StH5555 

640 DATA 8tH5555,8tH5555,StH5515,8tH5555,StH5 

555, StH5455, 8tH5505, 8tH5555 

650 DATA 8tH5555, StH5055, StH5501, StH5555, 8tH5 

555, StH4055, 8tH5500, StH5555 

660 DATA 8tH5555, StH55, StH1500, StH5555, S.H555 

5, 8tH54, StHlOO, StH5555 

670 DATA StH5555,StH40,StH0,StH5515,StH5455,8t 
HO, StHO, StH5501 



































HG 620 MONEY = MONEY —0.25: BANK=BANK+0. 






AN 730 CHSET* ( HANDLE , F I LL- 1 ) =HANDLE* 



Atari Jackpot Ray Patripk f ? 

"Jackpot" for the Atari is a random slot- 
machine simulation that uses a fancy tech¬ 
nique to manipulate the image on the 
screen. Strings are used to hold the charac¬ 
ter images that are placed on the screen. A 
pointer to the string is used to specify which 
character is being displayed on the screen. 
The character codes on the screen are never 
changed, but the data that the character 
code references is changed to simulate the 
movement. This is done through the 
pointer. 

This technique allows BASIC to appear 
a lot faster than it really is. If you were to 
change the character code on the screen in¬ 
stead of changing the pointer, the simulation 
would slow down considerably and the only 
thing that could speed it up would be ma¬ 
chine language. 

The game is very easy to play. All you 
really have to do is press the P key to play 
and the E key to end. You will begin each 
game with five dollars. Each bet is limited to 
a quarter to force you to be thrifty. You may 
be glad about this restriction after you re¬ 
alize how difficult it is to win. Payouts are 
based on odds. 


NK 890 CHSET* (HANDLE, FILL-1 ) =HANDLE* 
GG 900 SOUND 0,0,0,0 



CB 1010 SETCOLOR 2, I NT ( RND (0 ) * 1 6) , 8 
M1020 SOUND 0,0,0,0 

DB 1030 CHSET*(FILL,FILL+7) =FILL* (9, 





FC 1070 SETCOLOR 2,4,10 
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REVIEWS 


The Complete Personal 
Accountant For The 
Commodore 64 


Richard DeVore 

The Complete Personal Accoun¬ 
tant for the Commodore 64 is a 
powerful personal finance pack¬ 
age with many useful options 
and features. It comes with two 
diskettes and a 190-page man¬ 
ual. The diskettes contain ten 
programs which include all the 
necessary functions and a tuto¬ 
rial to help you get started. The 
5% X 8V2-inch bound manual is 
thorough, but the binding 
makes it a bit awkward to use 
while working at the com¬ 
puter—it will not lie open. 

Twenty Dollar Insurance 

There's an unpleasant surprise 
in a letter that comes with the 
package. It reads as follows: 
"IMPORTANT: If you wish to 
obtain service from our Tech¬ 
nical Support Staff and be ad¬ 
vised of any enhancements, 
program changes, helpful hints, 
or new products, the infor¬ 
mation on the next page of this 
letter must be completed and re¬ 
turned immediately to Future- 
house, Inc. with $20." This 
policy means that you should 
add $20 to the cost of the pack¬ 
age when making your value/ 
cost comparison. 

The software package con¬ 
sists of ten programs which 
work together. They allow set¬ 
ting up a chart of accounts, 
keeping track of expenditures, 
setting up a budget, and trying 


to keep within it, in addition to 
computing net worth state¬ 
ments. There are payment and 
appointment calendar functions 
as well as graphing and mailing 
list management programs. 

Lightning Demo 

The onscreen tutorial, which 
looks more like a demonstra¬ 
tion, covers each of the pro¬ 
grams of the Complete Personal 
Accountant. 

Starting with the Chart of 
Accounts, you are shown what 
the various menu items allow 
you to accomplish. The speed of 
the self-paced demonstration is 
quicker than I was able to keep 
up with. In most cases, it didn't 
give me sufficient time to read 
the complete screen. This offers 
an impression of what the pro¬ 
grams do, but doesn't really 
teach how it is done. The first 
screens cover most of the menu 
functions, but as you progress 
there is a tendency to skip some 
functions. 

The concept of the tutorials 
is good, and if you run each one 
several times or have quicker 
reading and retention than I, 
you may derive more benefit 
from them. If Futurehouse slows 
down the screen-flipping speed 
in later releases, the tutorial will 
be more effective. 

To use the software you 
will need a Commodore 64 
computer with a 1541 disk drive 


and several formatted disks on 
which to store your files. The 
manual states that a printer is 
optional, but a printer really is 
almost mandatory. Even the 
manual recommends having a 
printout of the Chart of Ac¬ 
counts available when inputting 
checkbook information. The 
Chart of Accounts provided 
with the program contains 66 
different accounts which I found 
extremely difficult to follow un¬ 
til I had a printout to scan for 
the proper account number. 

To use the Complete Per¬ 
sonal Accountant, it is necessary 
to set up your work files first. 
The Chart of Accounts is the 
main one, and the manual leads 
you through its initialization on 
a step-by-step basis. For your 
convenience there is already a 
standard Chart of Accounts set 
up and numbered. Using this as 
a model, it was quite easy to 
configure another to suit my 
needs. It is not necessary to use 
the chart provided, but it is nec¬ 
essary to maintain the five ma¬ 
jor types of accounts within the 
setup account numbers. 

This is clearly shown in the 
manual and is not restrictive but 
merely reveals the power of the 
program. Thought should be 
given to the accounts and 
subaccounts that may be most 
needed or useful prior to doing 
your Chart of Accounts. This 
will allow you to make the best 
use of the program. A separate 
chart has to be made up for 
each checking account that you 
are working with. 

Bouncing Checks 

Before inputting your checkbook 
information, you should go 


















>u{h A Peal 


NEW 

LOW PRICES 


Gemini 10X.$267 

Legend 80 CPS.$239 

Legend 100 CPS.$259 


12 In. Amber Monitor . $89 
Concord Disk Drive .. $297 

SUCH-A-STEAL 
ON SOFTWARE! 

Epyx Summer Games. $25 

SubLogic Flight Simulator II.. $37 

Screenplay Pogo Joe. $19 

Access Beachhead. $23 

Infocom Sorcerer. $33 

Continental Home Acct. $47 

Timeworks Word Writer. $39 

Timeworks Data Manager II . $39 
Commodore Magic Desk ... $55 
Microware Clone Machine .. $39 

Blue Sky Super Copy. $29 

Handic CalcResult Adv"d.... $75 


CALL FOR OTHER 
SUCH-A-STEAL PRICES 
ON SOFTWARE AND 
HARDWARE FOR 
YOUR COMMODORE 



CALL TOLL FREE 
1-800-431-8697 

For Customer Service 
Call: 602-957-3619 



same as the previous check. 
When this is done, the program 
automatically brings the infor¬ 
mation forward and inserts it for 

Once you have set up the. 
Chart of Accounts and input 
your checking information, the 
program is ready to work for 
you. Using the menu-driven for¬ 
mat, it is quite easy to establish 
a budget and compare your 
monthly expenses to your bud¬ 
geted expenses. You may also 
change your budget at any time 
in order to make it more realis¬ 
tic. With a printer connected, 
the figures may be printed out 
for examination at your leisure. 

The financial statement por¬ 
tion of the program is a method 
of ascertaining your net worth. 
All the input is done through 
menus. This would include such 
items as outstanding loans, 
home mortgages, value of in¬ 
vestments, and anything else 
that pertains to value, whether 

Financial Records 

Once the information has been 
entered, the program provides 
both net worth and the ratio of 
income to expense. These may 
be printed out on your screen or 
on paper. By keeping the infor¬ 
mation updated, you will al¬ 
ways be able to determine your 
financial status. This could be 
quite useful should you need to 
take out a loan, because all 
banks like financial records that 
they can both read and 
understand. 

The rest of the programs in¬ 
cluded in the Complete Personal 
Accountant are not directly re¬ 
lated to your financial record 
keeping. They allow you to set 
up a payment schedule that 
may be accessed to determine 
which bills should be paid on a 
given date, or an appointment 
calendar for keeping up with 
your luncheon dates and when 
to be at the IRS office. 

They even include a pro¬ 
gram that allows graphing your 


expenses and income along with 
assets and liabilities. Each of 
these can be done singly or all 
on one graph. Just like other 
portions of the program, these 
can be printed to screen or pa¬ 
per. This function would be use¬ 
ful if a quick analysis were 
needed, and besides, the shock 
value of a graph of your.finan¬ 
cial situation may be what you 
need to adhere to a budget. 

A more useful portion of 
the package is the mailing list 
program. This is saved on its 
own disk and can contain up to 
1200 addresses. There are provi¬ 
sions for updating and sorting. 
Just like the other programs, it is 
all menu-driven and very easy 
to use. Once this is set up, the 
information may be retrieved in 
any amount or order desired. 
Although the manual does not 
give specific instructions for do¬ 
ing so, mailing labels can be 
printed. 

All things considered, the 
Complete Personal Accountant is 
a powerful and easy-to-use set 
of programs. If you need a pro¬ 
gram to help you keep your fi¬ 
nances straight, you should 
consider this one. 

Complete Personal Accountant 
Futurehouse, Inc. 

P.O. Box 3470 
Chapel Hill, NC 27514 
$79.95 


Star League 
Baseball 

Shay Addams 

Writing a sports simulation must 
be really tough on a program¬ 
mer because he or she doesn't 
get to invent the rules of the 
game. At the same time, the po¬ 
sitions, actions, and interactions 
of the members of the opposing 
teams have to be smoothly co¬ 
ordinated—according to those 
rules—and convincingly ani¬ 
mated. On top of that, the pro- 

















grammer's work is ultimately 
judged on how effectively those 
rules are implemented in the 
game without sacrificing 
playability. 

It's even possible to err on 
the side of authenticity. Starbowl 
Football, the previous effort from 
the same company that pro¬ 
duced this entry, was too realis¬ 
tic: Tossing and receiving a pass 
required moving the receiver ex¬ 
actly under the flying ball and 
pressing the fire button at pre¬ 
cisely the right instant—a near¬ 
impossible, frustrating maneuver 
that took even the most adept 
joystick maestros a long time to 
master. Fortunately for the 
sports-minded, the ball handling 
techniques in Star League Base- 

Grandstand Viewpoint 

In fact, it's one of the most en¬ 
joyable sports simulations ever, 
offering an unusual perspective 
on the diamond—the view 
you'd get if you were sitting up 
in the grandstands behind first 
base. Joysticks control the action 
with logically designed patterns. 
When you're in the field, the 
ball can be thrown to any of the 
infielders by pressing the fire 
button once and moving the 
stick in the direction of the 
base's actual position. The loca¬ 
tion of the man throwing the 
ball is irrelevant; this makes it 
easy to learn and execute the 
moves. 

Hit the button twice to re¬ 
turn the ball from any player to 
the pitcher. When he's got the 
ball, the same action puts him 
in pitching mode, and he 
crouches to look for the catch¬ 
er's signal. Then you hold the 
button down and move the stick 
in one of eight directions, each 
indicating a different type of 
pitch, to send the ball flying 
across the plate. The pitcher has 
the option of changing his mind 
by releasing the button. This en¬ 
ables him to try to pick off a 
base runner who looks eager to 
steal second or third. 
































At the start of the game, 
you select from three pitchers, 
each with his own specialties, 
which include sinkers, curves, 
fast balls, and sliders of varying 
speeds and height. You're better 
off holding "Knuckles" in the 
bullpen as a relief pitcher, 
though. That's right, there's a 
seventh inning stretch that al¬ 
lows for this option. 


Striking Out 

To swing the bat, just press the 
fire button. In addition to visu¬ 
alizing the ball's trajectory, it 
helps if you glance at its 
shadow. The distance between 
the two provides a fair gauge of 
whether the ball's high, low, or 
in the strike zone. A batting 
practice option is convenient for 
honing this skill to perfection. 


You can also bunt, and then 
control the direction in which 
the ball travels. After each pitch, 
big block letters display the re¬ 
sults (strike, out, ball, home run, 
etc.) at the top of the screen. 
When the catcher tosses the ball 
back to the pitcher, this display 
is replaced by the number of 
strikes, balls and outs, the cur¬ 
rent inning, and other vital 
information. A scoreboard also 
appears between innings, post¬ 
ing the runs scored in each 
inning. 

The batter automatically 
runs to first upon hitting a fair 
ball, but you'll soon learn that 
placement—where the ball 
lands—makes a big difference 
in whether you get thrown out 
or not. Infield hits generally re¬ 
sult in failure. Hit to the out¬ 
field, and you'll have more time 
to make it to first; the offense 
gets joystick control of the out¬ 
fielder nearest the ball, and 
must race after the ball. He can 
snare a fly ball by watching its 
shadow to figure out where it 
will land. 

Stealing Bases 

A runner won't advance to the 
next base unless you move the 
stick to the right. This allows 
you to lead off the base, or even 
steal. But watch out, because it's 
easy to get caught in a rundown 
between a pair of infielders. 
Episodes like this spark genuine 
excitement when you're playing 
the computer or a friend, but 
the two-player games are defi¬ 
nitely more fun. Strategy is as 
important a role as eye-hand co¬ 
ordination, because it pays to 
figure out the pitcher's pattern. 

If he just tossed a ball right 
down the middle and the 
count's now three and two, will 
he repeat himself, or try to fake 
you out with a high slider? You 
have only split seconds to make 
the same decisions you would 
in the batter's box. 

The SID chip recreates the 
smack of a ball connecting with 





























































INSIGHT: Atari 


Bill 


The assembler listing which accompanies this 
article is a set of patches to Atari DOS 2.0s. If 
you own an Atari 1050 drive, these patches will 
allow you to use it in "enhanced density" mode. 

Before we get started with the listing and its 
explanation, though, let's look at a new tidbit. 

Bye-Bye BASIC 

Are you an 800XL owner? Do you have an un¬ 
protected diskette which boots a machine lan¬ 
guage program via an AUTORUN.SYS file? 
Would you like to avoid pushing the OPTION 
button? Are you willing to follow a few simple 
steps to do so? 

Your 800XL enables and disables the built-in 
BASIC by changing the contents of location 
$D301 (54017). In Atari 400s and 800s, this loca¬ 
tion is usually used to input the state of joysticks 
3 and 4. In an 800XL, this port controls various 
system hardware configurations. 

For example, bit 0 of $D301 controls 
whether the OS ROM is active or whether you 
are using the RAM underneath it. And—guess 
what—bit 1 of $D301 controls whether the built- 
in BASIC is active or not. Specifically, the follow¬ 
ing table applies: 

Bit 0 - 1 OS ROM enabled 

0 OS ROM disabled, RAM enabled 

Bit 1 =1 Atari BASIC disabled, RAM enabled 
0 Atari BASIC enabled 

At least one of the other bits in $D301 is 
used (to control whether or not the diagnostic 
ROM is enabled), but the "normal" values for 
$D301 are either $FF (BASIC disabled) or $FD 
(BASIC enabled). 

No Option Button 

So all we need to do is add a couple of instruc¬ 
tions to our AUTORUN.SYS file, to select RAM 
instead of BASIC, and we will no longer have to 
hold down the OPTION button. For example, we 
might add: 

LDA #$FF 

And, yet, there is an easier way. Remember, 

Atari LOAD files may consist of multiple seg¬ 
ments, each of which starts with a start address 
and an end address. The entire file starts with a 
pair of $FF bytes, but it doesn't hurt if there are 


extra $FF header bytes in front of other segments. 

So consider: If we specify that we have a 
LOAD file which, starts at location,$D301 and 
ends at location $D301, the DOS file loader will 
try to load (and thereby store) a single byte at 
location $D301. This is equivalent to storing a 
byte via our program. 

Disabling BASIC 

So simply use the following steps to modify your 
AUTORUN.SYS to disable the built-in BASIC: 
Under Atari DOS 2.0s: 

1. Boot your DOS disk while holding down 
the OPTION button. 

2. Put the disk containing the 
AUTORUN.SYS you want to modify into 
drive 1. 

3. Use the E option from the DOS menu. 
When prompted for old and new 
filenames, respond: 
D:AUTORUN.SYS,AUTORUN.OLD 

4. Use the K option from the DOS menu. 
When prompted for filename, starting ad¬ 
dress, etc., respond: 
D:AUTORUN.SYS,D301,D301 

5. Use the C option from the DOS menu. 
When prompted for from and to 
filenames, respond: 

DrAUTORUN.OLD, AUTORUN.SYS /A 

Under OS/A+ or DOS XL: 

1. Boot your DOS disk while holding down 
the OPTION button. If the DOS XL menu 
appears, use the Q option. 

2. Put the disk containing the 
AUTORUN.SYS you want to modify into 
drive 1. 

3. Type the command: 

RENAME AUTORUN.SYS AUTORUN.OLD 

4. Type the command: 

SAVE AUTORUN.SYS D301 D301 

5. Type the command: 

COPY -AF AUTORUN.OLD AUTORUN.SYS 

And that's it. Your AUTORUN.SYS file 
should now be ready to use. 
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Check The Pointers 

Caution! Even though the built-in BASIC is now 
disabled, HIMEM (the contents of location $2E5) 
and RAMTOP (contents of location $6A) will still 
reflect the 40K byte configuration where BASIC 
is present. If your program pays attention to one 
or both of these two values, it would also be 
worth performing the following steps: 

1. Change RAMTOP to reflect the full 48K 

2. Close channel zero (the screen editor). 

3. Open channel zero for the E: device. 

These steps will insure that all 48K bytes of 

accessible RAM are in use by your program. I 
won't go into how to accomplish these here and 
now. Write if you would like me to show how to 
code those steps in machine language. 

Coming Attractions 

A project related to this, which I hope to im¬ 
plement in an upcoming column, would be an 
"M:" device driver. Once upon a lifetime ago, in 
this column, I presented such a driver. It used 
the "excess" memory (between the top of a 
BASIC program and the bottom of the graphics 
screen) as a pseudodevice. 

I would like to do the same thing again, but 
this time use the extra memory under the OS 
ROMs or under the built-in BASIC as a superfast 
RAM disk. Stay tuned for further developments. 

DOS 2.0s For Enhanced Density 
1050s 

First, I would like to point out that the task of 
reconfiguring Atari DOS 2.0s for an enhanced 
density 1050 is difficult. I would also like to note 
that it is extremely difficult (if not impossible) to 
finish the task if you have only one drive. 

So, may I suggest that you cooperate with a 
friend and his drive if you have only one of your 
own. If your friend's drive is an 810 or a non- 
Atari drive, it should be set up as drive 1. Your 
1050 should be set up as drive 2. 

Also, you should use an assembler capable 
of placing its object code directly in memory. (For 
example, AMAC—the Atari Macro Assembler— 
cannot be used for this job.) This is because load¬ 
ing the DOS-modifier code from a disk will use 
DOS itself, and you are almost guaranteed to run 
into conflicts. Atari's Assembler Editor cartridge, 
the old OSS EASMD, OSS's MAC/65, and (I be¬ 
lieve) SYNASSEMBLER will all work properly 
(though the syntax for SYNASSEMBLER may 
vary a bit from what I show here). 

You should boot a normal Atari DOS 2.0s 
disk, making sure that you can access a normal 
single diskette in drive 2 (at least to the point of 
making sure you can list its directory). Be sure 


you have at least two (2) blank or junk disks 
ready and at hand. Then begin. 

Patching DOS 

Type in the program, as shown herein. You may 
use automatic line numbering if you wish. Type 
in just the part from the right of the line num¬ 
bers. LIST or SAVE the source code to disk and 
then assemble it. Check it against the listing 
given here. Do not proceed until you are reason¬ 
ably sure that you have typed it in and assem¬ 
bled it correctly. 

Then change line 1000 to read: 

1000 .OPT NOLIST,OBJ 
and assemble the code once more. 

Voilal DOS has been patched! 

But, because DOS's DRVTBL has changed 
format, you must now hit the SYSTEM RESET 
key. Then give the DOS command from your 
assembler. Assuming that you get to the DOS 
menu (and if you don't, you did something 
wrong), it would probably be a good idea to im¬ 
mediately format (menu option I) a blank disk in 
drive 1 and write the DOS files (option H). 

Implementing Enhanced Density 

Now comes the tricky part. The way we have 
patched DOS 2.0s, DOS automatically checks 
each drive at power-on (or SYSTEM RESET) time 
to find its current configuration (single density, 
double density, or enhanced density). But the 
1050 assumes it is in single-density mode unless 
you have inserted an enhanced-density diskette. 
So, up until now, DOS thinks it is working with 
all single-density disk drives. How do we change 

The easy way: Turn your power off, put your 
BASIC (or BASIC XL) cartridge into your ma¬ 
chine, and turn the power back on, thus booting 
the disk we just formatted and wrote DOS files 
to. Insert a blank disk into the second drive (your 
1050). From BASIC, give the following command: 

XIO 254,#l,0,34,"D2r" 

If you are a faithful reader, you will rec¬ 
ognize that as the format command, given from 
BASIC. But the 34 in the next-to-last position is 
new! That's right. As we have patched DOS, a 
nonzero value given in AUX2 is assumed to be 
the format command value to be sent to the disk 
drive. The only legal values here are 33 (for single 
density, a la 810 drives) and 34 (for 1050 en¬ 
hanced density)! 

Now drive 2 contains what we hope is an 
enhanced-density diskette. Once more, hit SYS¬ 
TEM RESET so that DOS will recognize the new 
density. Then give the DOS command from 
BASIC. Once in DOS, use the H menu option to 
write the DOS files to drive 2. 


If you have performed all these steps 
correctly, you should now have a bootable 
enhanced-density diskette in drive 2. You might 
wish to change your 1050 back to being drive 1 
and try to boot from it with this new diskette. 

Simpler Commands 

The beauty of this system is that, once you have 
created this one enhanced-density master, you 
may make new enhanced-density masters by using 
just the I and H commands from the DOS menu. 

There is, however, one potential problem. 
How do you copy files from an old single-density 
disk to a new enhanced-density disk? For now, 
the only practical way is to borrow a second 
drive and have one of each type of disk on your 
system. There may be ways around even this 
problem. We'll see. 

Patching Other DOS Versions 

The patch program given here will also work on 
all versions of OS/A+ and DOS XL from 1.2 to 
2.3 (except that it will not patch the DOSXL.SYS 
versions). 

The procedures are almost the same, but it is 
significantly easier to use a single drive. Try the 
following if you have only a single disk, on 
which you boot OS/A+ or DOS XL: 


1. Type in, save, and check out the patch 
listing as described above. 

2. Hit SYSTEM RESET. If you end up back 
in an assembler cartridge, type a DOS 
command. 

3. From the Dl: prompt, use an INIT com¬ 
mand. Or use the I option from the DOS 
XL menu. 

4. Use Option 1 (on a blank disk) or 3 (on an 
existing disk) of INIT. Use Option 4 to re¬ 
turn to DOS. 

5. Insert a BASIC cartridge. Reboot from the 
disk you just INITed. 

6. Type the following BASIC command: 

XIO 254,#1,0,34,"D1:" 

7. Hit SYSTEM RESET after the formatting is 
finished. If you are not then in the BASIC 
cartridge, use the CAR command. 

8. Type the following BASIC command line: 
OPEN #1,8,0,"D1:DOS.SYS" : CLOSE #1 

The reason the procedure works on a single 
drive is that neither OS/A+ nor DOS XL re¬ 
quires the DUP.SYS file of Atari DOS. The disk 
initialization can thus be performed entirely from 
BASIC. 


.OPT LIST,NO OBJ 
■ PATCHES TO ATARI DOS 2.0i 


=1311 
=1301 
=0048 
=11DB 


=0021 

=0302 

=0045 

=0A4A 

=0A4C 

=0D18 

=0BD6 

=1372 

=034B 


1050 

1060 

1070 

1100 

1110 

1120 

1130 

1150 

1160 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1340 


; THESE PATCHES ALLOW AN ATARI 1050 DRIVE 
; TO UTILIZE ENHANCED DENSITY UNDER 
; DOS 2.0S, TO A MAXIMUM OF 965 FREE SECTORS 


- TAKEN FROM THE LISTING OF 
ATARI DOS AS PUBLISHED IN 
"INSIDE ATARI DOS" 

FROM COMPUTE 1 BOOKS 


DRVTBL = $1311 
CURFCB = $1301 
ZSBA = $48 

DERR1 = $11DB 
DRVTYP = $12FE 
DCBCFD = 1 1 
DCBCMD = $0302 
ZDRVA = $45 
NOBURST = $0A4A 
WRBUR = $0A4C 
XFORMAT = $0D18 
XFV = $0BD6 

Z = $1372 

ICAUX2 = $034B 
FCBOTC = $1382 


The rest of this listing will appear in “Insight: Atari" next month. 
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ML Tracer 

Thorjias G Gordprr^i' 


Attempting to debug a machine language program 
can sometimes be a trying experience, especially 
when the program always seems to exit into the 
twilight zone. And trying to study a program in 
ROM can be just as frustrating, even with a 
disassembler (where do . branch instructions go?). 
Here's an excellent programming utility: a single¬ 
stepper for Atari, Apple, and all Commodore 
computers. 


Anyone who has ever worked with machine lan¬ 
guage knows how helpful it can be to be able to 
single-step through a program. "ML Tracer" al¬ 
lows you to step through a machine language 
routine one event at a time and print out the 
contents of all of the microprocessor registers 
after each instruction. It also allows you to follow 
all branches, jumps, and returns. The program 
will display the address, opcode, mnemonic, and 
operand of each instruction. 

Three versions are included. Program 1 runs 
on all Commodore computers (for the VIC, 8K or 
more expansion memory is required). Program 2, 
for the Apple II, is only slightly different from 
the Commodore version. The Atari version. Pro¬ 
gram 3, has more substantial changes, but its 
structure is still quite similar. Since all the ver¬ 
sions have the same line numbers, references in 
this article apply to all versions unless otherwise 
stated. 

When Tracer is run, there will be a ten- 
second delay while the DATA statements are 
read. You'll then be asked for the hex address of 
the ML program you wish to examine. You can 
change the contents of any register, before each 
instruction is executed. Press a for the accu¬ 
mulator, x for the x register, y for the y register, s 
for the stack pointer, p for the processor status, 
or i for the instruction pointer (program counter). 
On the Atari, also press RETURN. When you're 
through loading registers, press RETURN once 
more to execute the next instruction. 


Hexadecimal numbers are used for all input 
and output. If you enter an address as a one-, 
two-, or three-digit hexadecimal number, zeros 
will be added on the left to make a four-digit 
number. If too many digits are entered, the 
rightmost four digits will be used. The same ap¬ 
plies to changing the value in a register. The 
number that you enter will be converted to a 
two-digit hexadecimal number using the same 

The Execution Subroutine 

The program is written mostly in BASIC, but 
contains two machine language subroutines. The 
first, the initialization subroutine, copies the low¬ 
est three pages (768 bytes) of RAM, which are 
used by BASIC, to a location above the BASIC 
program. The other, the execution subroutine, ex¬ 
changes the two three-page blocks of data and 
loads all the registers with their saved values, 
then executes one instruction (which has been 
POKEd in from BASIC). When the instruction 
has been executed, the registers are saved and 
BASIC's original lower three pages of memory 
are restored. 

The same technique was used to identify 
addressing modes as in my disassembler ("A 
6502 Disassembler," COMPUTE!, January 1981, 
p. 81). Lines 10000-10031 contain four-character 
extended mnemonics for the 6502's instruction 
set. The fourth character is a tag code identifying 
the addressing mode of the instruction. In lines 
110-120, the mode is identified and the proper 
subroutine is called. 

There are several instructions which cannot 
be allowed to actually execute in the machine 
language subroutine. If any control transfer 
instructions (JMP, JSR, RTS, RTI, or a conditional 
branch) were executed, control would not be re¬ 
turned properly to the BASIC program. These in¬ 
structions are simulated in BASIC instead, so that 
they appear to execute successfully. The SEI and 
CLI instructions are ignored, since interrupts are 
always disabled during the execution subroutine. 
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How Does It Work? 

The simplest way to see how the program works 
is to trace through an example. Suppose the 
instruction LDA #$20 resides at addresses 
$03C0-$03C1. For this instruction, the extended 
mnemonic is LDAB, where LDA stands for LoaD 
Accumulator, and B is the tag code for immediate 
addressing. The hexadecimal representation for 
LDA immediate is $A9, which is equivalent to 
decimal 169. 

Line 50, the top of the main loop, calls the 
keyboard pause routine at line 7000, which also 
handles changing registers. In line 55, the vari¬ 
able C is loaded with 169 by PEEKing the mem¬ 
ory addressed by B, the instruction pointer. The 
value of B, 960 in this example, is then converted 
to hexadecimal characters in line 2000 and 
PRINTed. 

In line 60, NOP instructions are POKEd into 
the execution routine to take up space after one- 
or two-byte instructions. The hexadecimal value 
of the opcode is printed next, and then the mne¬ 
monic is retrieved from the array R$(). (In the 
Atari version, mnemonics are stored in the string 
R$.) If the mnemonic is a blank, this instruction 
is undefined and an error message is displayed. 
Otherwise, the standard (three-character) mne¬ 
monic is PRINTed, the opcode is POKEd into the 
execution routine at OP, and the program 
counter is incremented to 961. 

The ASCII code for B is 66, so the ON 
GOSUB in line 120 transfers control to line 400. 
Here, the symbol for the addressing mode, #$ is 
printed. The one-byte operand routine, at line 
3000, PEEKs location 961, pointed to by the pro¬ 
gram counter. This number is POKEd into 
OP + 1; then converted to hexadecimal and 
PRINTed. After incrementing the program 
counter to point to the start of the next instruc¬ 
tion, a RETURN is executed at line 3000. 

At line 5000, the execution routine is SYSed, 
CALLed, or USRed depending on which com¬ 
puter you have. The contents of the registers are 
displayed, and control passes back to line 120. 
Here, a GOTO 50 takes us back to the top of the 
loop, where the instruction at $3C2 will be 
executed. 

Tracing Is Educational Too 

You will find that this program is most useful for 
testing small ML programs, such as those called 
as subroutines from BASIC. It's also good for 
examining sections of larger programs when 
you're not sure how a particular routine works. If 
you're learning machine language, you'll find 
that the register display is an enormous help in 
understanding the effects and side effects of each 
instruction, especially the bits (flags) of the 
processor status register. 


Do be careful, though. Any program is 
vulnerable when dealing with something as 
powerful as machine language, and this one is 
no exception. There are more ways to kill a 
BASIC program from ML than anyone can name 
in one sitting, so always be conscientious about 
saving your programs. After you type this one in, 
SAVE it before you even think about running it. 
One typographical error could cause the program 
to erase itself, or at least lock up the computer. 

There are also some ML programs that this 
tracer can't follow, such as those which dis¬ 
connect the keyboard or video display (whether 
intentionally or accidentally). If everything is. 
saved on disk or tape (for real security, take the 
diskette or cassette out of the drive), you can 
experiment as much as you want, and then if 
disaster struck all you'd have to do is just turn 
the computer off and reload the program. 

Program 1: Commodore ML Tracer 

Refer to the "Automatic Proofreader" article before typing this 
program in. 

10 GOSUB6000 :rem 167 

35 POKEA,0:POKEX,0:POKEY f 0 s POKEP,52:POKES 

45 H$=RIGHT$(H$, 4):GOSUB1500:B=D:PRINT"AN 

50 GOSUB7000:D=FRE(0) :rem 197 

55 PRINT:C=PEEK(B):D=B:GOSUB2000 s PRINTH$" 

60 POKEOP+1, 234:POKEOP+2,234 :rem 127 

70 D=C:GOSUB2000:PRINTRIGHT$(H$,2 ) " 

:rem 170 

80 IFR$(C)=""THENPRINT"INVALID OPCODE":PR 
INT:G0T035 :rem 229 

90 R$=LEFT$(R$(C),3):PRINTR$" "?:POKEOP,C 

100 IFR$="BRK"THENPRINT:G0T035 :rem 141 

110 U$=RIGHT$(R$(C),1):IFU$=" "THENGOSUB2 
00:GOTO50 :rem 126 

120 ONASC(U$)-64GOSUB300,400,500,600,700 # 
800,900,1000,1100,1200,1300:GOTO50 

199 REM{4 SPACES}>IMPLIED MODE< :rem 42 

200 IFR$="RTS"THENGOSUB4000:B=D:GOSUB4000 

:B=D*256+B+1:GOSUB5005:RETURN :rem 42 

203 IFR$<>"RTI"THEN208 :rem 16 

205 GOSUB4000:POKEP,D:GOSUB4000:B=D:GOSUB 
4000:B=D*256+B:GOSUB5005:RETURN 

:rem 204 

208 IFR$="SEI"ORR$="CLI"THENGOSUB5005:RET 

210 GOSUB5000:RETURN :rem 242 

299 REM{4 SPACES}>ABSOLUTE MODE< :rem 134 

300 PRINT"$";:GOSUB2500 :rem 68 

310 IFR$="JMP"THENB=PEEK(OP+l)+PEEK(OP+2) 

*256:GOSUB5005:RETURN :rem 34 

320 IFR$<>"JSR"THEN340 :rem 13 

330 B=B-1:D=INT(B/256):GOSUB3500:D=B-INT( 
B/256)*256:GOSUB3500 :rem 249 

335 B=PEEK(OP+1)+PEEK(OP+2)*256:GOSUB5005 
:RETURN :rem 141 

340 GOSUB5000:RETURN :rem 246 
















10023 DATACLV 


10024 DATACPYB,CMPF 

10025 DATAINY # 

10026 DATABNEJ,CMPG 

10027 DATACLD ,CMPE 

10028 DATACPXB,SBCF 

10029 DATAINX , SBCB 

10030 DATABEQJ,SBCG 

10031 DATASED , SBCE 

10032 DATAEND 
20000 DATA162,0,181 


20002 DATA157,0,43,232,208,2 

20003 DATA162,0 

20004 DATA149,0 


90 R* - LEFT* (R*(C),3)i PRINT R 
*" "j s POKE OP,C:B - B + 1 
100 IF R* - "BRK" THEN PRINT : GOTO 


20007 DATA189,0,43,157,0,2,152,157 

:rem 180 

20008 DATA0,43,232,208,213,186,138,174 

:rem 125 

20009 DATA243,40,154,141,243,40,172,242 

20010 DATA40,174,241,40,173,244,40,72 

20011 DATA173,240,40,40,234,234,234,8 

20012 DATA141,240,40,104,141,244,40,142 

20013 DATA241,40,140,242,40,186,138,174 

srem 167 

20014 DATA243,40,154,141,243,40,162,0 

20015 DATA181,0,168,189,0,41,149,0 

20016 DATA152,157,0,41,189,0,1,168 

20017 DATA189,0,42,157,0,1,152,157 


Program 2: Apple ML Tracer 

10 GOSUB 6000 

35 POKE A,0s POKE X,0: POKE Y,0: 

POKE P,52: POKE S,255 
40 PRINT "START ADDRESS (HEX)";* 
INPUT H* 

42 IF H* = "" THEN H* - "C000" 

45 H* - RIGHT* (H*,4): GOSUB 150 
0:B « D: PRINT "ANY KEY TO S 
TEP" 

50 GOSUB 7000:D « FRE (0) 

55 PRINT sC - PEEK (B):D - B: GOSUB 
2000: PRINT H*" "5 
60 POKE OP + 1,234: POKE OP + 2, 

234 

70 D - C: GOSUB 2000: PRINT RIGHT* 


,1100,1200,1300: GOTO 50 

199 REM XMPLIED MGDE< 

200 IF R* - "RTS" THEN GOSUB 
00:B = D: GOSUB 4000:B - D 


203 


FI" THEN 208 


4000:B = D: GOSUB 4000:B » D 
* 256 + B: GOSUB 5005: RETURN 

208 IF R* = "SEI" OR R* » "CLI" THEN 
GOSUB 5005: RETURN 

210 GOSUB 5000: RETURN 

299 REM >ABSOLUTE MODE< 

300 PRINT "*";: GOSUB 2500 

310 IF R* - "JMP" THEN B = PEEK 
(OP + 1) + PEEK (OP + 2) * 

256: GOSUB 5005: RETURN 

320 IF R* < > "J8R" THEN 340 

330 B - B - 1:D « INT (B / 256): 

GOSUB 3500:D * B - INT (B / 
256) * 256: GOSUB 3500 

335 B - PEEK (OP + 1) + PEEK (O 

P + 2) * 256: GOSUB 5005: RETURN 

340 GOSUB 5000: RETURN 

399 REM XMMEDIATE MODE< 

400 PRINT G08UB 3000: G08UB 

5000: RETURN 

499 REM >ZERO PAGE MODE< 

500 PRINT "*"|i GOSUB 3000: GOSUB 
5000: RETURN 

599 REM >ABSOLUTE,X< 

600 PRINT "*"j: GOSUB 2500: PRINT 
",X"j: GOSUB 5000: RETURN 

>ABSOLUTE,Y< 


PRINT ' 
REM 

PRINT " 


GOSUB 2500: PRINT 
30SUB 5000: RETURN 
X INDIRECT,X3 


: PRINT 
",X)"|: GOSUB 5000: RETURN 

899 REM X INDIRECT),Y< 

900 PRINT "(*";: GOSUB 3000: PRINT 
"),Y"j 1 GOSUB 5000: RETURN 

999 REM >ZERO PAGE,X< 

1000 PRINT ;: GOSUB 3000: PRINT 
",X"j: GOSUB 5000: RETURN 

1099 REM >ZERO PAGE,Y< 

1100 PRINT "*"|: GOSUB 3000: PRINT 
",Y"j: GOSUB 5000: RETURN 

1199 REM >RELATIVE JUMP< 

1200 PRINT "TO "j:D - PEEK (B): 

D - (D > 127) * 


256: D 


D:B1 - 


1210 GOSUB 2000: PRINT "*"H*j:BM 
- BM ( INT (C / 64)): BC - IN 
( PEEK (P) / BM):BC - BC - 2 
* INT (BC / 2) 

1220 IF BC - ( INT (C / 32) - 2 * 
INT (C / 64)) THEN B - B1 


















1230 GOSUB 5005i RETURN 

1299 REM >INDIRECT JUMP< 

1300 PRINT M <"|i GOSUB 2500« PRINT 

")"I«B - PEEK (OP + 1) + PEEK 
(OP + 2) * 256 

1310 B = PEEK (B) + PEEK (B + 1 
) <256i GOSUB 5005i RETURN 

1499 REM > HEX TO DEC < 

1500 D = 0i FOR I - 1 TO LEN (H* 

>|J = ASC ( MID* (H*,I,1)) - 
48:D-D*H+J-7* (J > 

9): NEXT : RETURN 

1999 REM > DEC TO HEX < 

2000 H* = "": FOR I - 1 TO 4iE = 

INT (D / H)sJ = D - E * H:H 

9)) + H*:D = Es NEXT 
2005 RETURN 

2499 REM > 2BYTE OPERAND < 

2500 D « PEEK (B + 1)* POKE OP + 

2,D: GOSUB 2000: PRINT RIGHT* 
(H*,2);: GOSUB 30001B = B + 

1: RETURN 

2999 REM > 1BYTE OPERAND < 

3000 D = PEEK (B): POKE OP + 1,D 
: GOSUB 2000: PRINT RIGHT* 
(H*,2);:B = B + 1: RETURN 

3499 REM > PUSH < 

3500 J = PEEK (S>: POKE ML + 512 

3505 IF J = 0 THEN PRINT s PRINT 
"WARNING: STACK OVERFLOW"«J = 

256 

3510 POKE S,J - 1: RETURN 

3999 REM > POP < 

4000 J - PEEK (S)*D = PEEK (ML + 

4005 IF J - 255 THEN PRINT : PRINT 
"WARNING: STACK UNDERFLOW":J 

4010 POKE S,J + 1: RETURN 

4999 REM > EXECUTE ONE INSTRU 
CTION < 

5000 CALL (ML + 23) 

5005 PRINT : FOR K « 0 TO 4:D « 

PEEK (A + K): GOSUB 2000 
5010 PRINT MID* (" A« X« Y- S« 

P*",3 * K + 1,3);: PRINT RIGHT* 
(H*,2);: NEXT : PRINT : RETURN 



6002 DIM R*(255): DIM BM(3): FOR 
I - 0 TO 3: READ B:Bh(I> = B 


6003 FOR T - 0 TO 255: READ R*(T 
): NEXT 

6004 READ R*: IF R* < > "END" THEN 

PRINT "ERROR IN OPCODES": PRINT 

"CHECK FOR TYPO'S": END 


6008 IF I < > 17737 THEN PRINT 

"ERROR IN ML DATA": PRINT "C 
HECK FOR TYPO'S": END 
6010 CALL ML 


6015 HOME : PRINT "6502 M 

6020 RETURN 

6999 REM > PAUSE < 

7000 GET A*: IF A* - "" T 


7010 

7020 

7030 

7040 

7050 

7060 


= "I" THEN D * B:L * 
UB 7100:B = D: GOTO 70 

= "A" THEN D = PEEK 
- 2: GOSUB 7100: POKE 
OTO 7000 

= "X" THEN D * PEEK 
* 2: GOSUB 7100: POKE 


►:L - 2: GOSUB 7100: POKE 
3: GOTO 7000 

- A* - "S" THEN D - PEEK (S) 

= 2: GOSUB 7100: POKE S,D: GOTO 


. = 2: GOSUB 7100: POKE 
GOTO 7000 

** - CHR* (3) THEN STOP 


7070 RETURN 
7100 PRINT A*"-";: 
= H*: INPUT H 

H* - A* 

7110 H* - RIGHT* ( 
500: RETURN 
9000 DATA 128,64,1 


0002 DATA BPLJ 

0003 'DATA CLC 
D, 

»4 DATA JSRP 
,ROLC, 

Z»5 DATA PLP 
ANDA,ROLA, 


BMIJ 
DATA SEC 
DATA RTI 


DATA CLI 
DATA RTS 

DATA PLA 
>CA, RORA, 
DATA BVSJ 


,,ORAH,ASL 
,,ORAD,ASL 


,,ADCH 
,,ADCD 


ADCG 
ADCE 

,STAF,,,STYC,STAC 
DEY ,,TXA ,,STYA, 


DEY 









LDAA,LDXA, 
0022 DATA BCSJ 
,LDXI, 

5 DATA CLV 
LDAD,LDXE, 
0024 DATA CPYI 
,DECC, 

0025 DATA INY 


TXS ,,,STAD 
>XB, , LDYC, 
IX ,,LDYA, 
LDYH,LDAH 
iX ,, LDYD, 
GPYC,CMPC 
DEX ,,CPYA, 
,f CMPH,DEC 


Program 3: Atari ML Tracer 

Refer to the "Automatic Proofreader" article before typing this 


KH10 GOSUB 6000 

DP 35 POKE A, 0 : POKE X,0:POKE Y,0:POK 
E P,52 s POKE S,255 

HA 40 PRINT "START ADDRESS (HEX) ” ; : I 




H$=H$(I):GOSUB 1500:B = D:PRINT 
"HIT RETURN TO STEP" 

GOSUB 7000:D=FRE(0) 

PRINT :C=PEEK(B):D=B:GOSUB 200 




189 

20001 DATA 0, 

20002 DATA 157 
96,120 

0,41 

20004 DATA 
9,0 

20005 DATA 1,168,189,0,42,157, 


20006 DATA 152 
168 

20007 DATA 


157,0,42,189,0,2, 
0,43,157,0,2,152, 


200 


0 DATA 40,174,241 


0,157,0,41, 


104,14 
242, 


L , 189 . 


DATA 189,0,42,157,0,1, 

818 DATA 0,42,189,0,2,168, 

0 

ATA 43,157,0,2,152,15i 
20020 DATA 232,208,213,88,96 



"INVALID OPCODE":PRINT :GOTO 3 


DE110 IF U*=" " THEN GOSUB 200:GOTO 


UB 5005:RETURN 


GOSUB 4000:POKE P,D:GOSUB 400 
0:B=D:GOSUB 4000:B=B*256+D:GO 
SUB 5005:RETURN 

GOSUB 5005:RETURN 
GOSUB 5000:RETURN 
REM >ABSOLUTE MODE< 

PRINT "$•■;: GOSUB 2500 

+PEEK(OP+2)*256:GOSUB 5005:RE 


:D=B-INT(B/256)*256:GOSUB 350 


OSUB 5005:RETURN 
PG 340 GOSUB 5000: RETURN 




NL 500 PRINT "i" ;: GOSUB 3000: GOSUB 5 

01599 REM >ABSOLUTE, X< 

KK 600 PRINT GOSUB 2500: PR I NT " 

,X";:GOSUB 5000:RETURN 
OK 699 REM >ABSOLUTE,Y< 

KM 700 PRINT GOSUB 2500: PRINT " 


", X) ";:GOSUB 5000:RETURN 


























































PROGRAMMING THE Tl _ 

C. Regena 

The Singing Computer 


If a computer can speak and can play music, can 
it sing? This month. I'll try to make the TI sing. 
First, to make the computer talk you need the TI 
Speech Synthesizer, a small peripheral device 
that attaches to the right side of the console. To 
use the speech synthesizer, you also need a com¬ 
mand module that is made to provide speech. 

To do your own programming with speech, 
you also need a command module. Right now 
the modules available are Speech Editor, TI Ex¬ 
tended BASIC, and Terminal Emulator II. Termi¬ 
nal Emulator II is the easiest to work with 
because you can type any word in and the com¬ 
puter will pronounce it phonetically. Speech Edi¬ 
tor and Extended BASIC use CALL SAY 
commands and have limited vocabularies. 

I've had several letters from people wonder¬ 
ing why certain phrases don't work. To make the 
computer say a phrase, such as Texas In¬ 
struments, use the number sign (SHIFT 3) before 
the phrase. For example, CALL SAY ("#Texas 
Instruments"). 

Unlimited Speech 

A bit of history here—the original speech syn¬ 
thesizer was designed to use the words in the 
Speech Editor and Extended BASIC lists. Inserts 
were going to be made available that had dif¬ 
ferent vocabularies (that's why some of the 
speech synthesizers have a lift-up lid). Then the 
Terminal Emulator II command module was in¬ 
vented, which provides unlimited speech, and in¬ 
serts to the synthesizer were no longer needed. 

Extended BASIC has also gone through at 
least one revision. I assume there are very few of 
the original version around because most users 
exchanged the original module for the second 
version as soon as they could. The first version 
did not support repeating keys and was notorious 
for "locking up" the computer. There were also 


some problems with using IMAGE statements. 

The Terminal Emulator II command module 
has a dual purpose. In fact, it's called Terminal 
Emulator II because it is used to make your TI 
act as a terminal for another computer. For tele¬ 
communications you can use your TI-99/4A with 
an RS-232 Interface and a telephone modem, 
plus the Terminal Emulator II command module. 

Pages 33-42 of the Terminal Emulator II 
instruction manual describe how to use speech. 
There are two main ways to use speech, "text-to- 
speech" and allophone speech. I use the 
text-to-speech method because all you have to do 
is spell the text phonetically. The allophone 
speech can be more exact because you can spec¬ 
ify certain sounds. The manual contains a list of 
allophone numbers with their sounds plus a few 
sample programs of how to use this method. 

Singing Requires Experimentation 

Working with speech in a program takes a lot of 
experimentation. First, you need to try different 
spellings to get the computer to properly say 
what you want it to say. Then you can try dif¬ 
ferent inflection symbols, A , _, and >. These are 
used to change inflections and stress points, but 
they can also change the tone of the voice. You 
can also add different pause symbols for different 
sounds and contours. These symbols are the 
comma, period, semicolon, colon, exclamation 
point, question mark, and space. Finally, you can 
alter the pitch and slope—this is what I do to 
make the computer sing. 

To create speech, you need the following 
statement: 

OPEN #l:"SPEECH",OUTPUT 
You may use any number after the number sign, 
just as in opening other types of files. Later, 
when you want the computer to speak, just use a 
command such as 



PRINT #1:"MY NAME IS SINNDY." 

The pitch is how high or low the voice 
sounds and can be a number from 0 through 63. 
Zero is a whisper, 1 is the highest pitched voice, 
and 63 is the lowest pitched voice. The slope is 
the rate at which the pitch changes in a spoken 
phrase. The slope may be a number from 0 
through 255. For the best results, the manual 
recommends a slope 3.2 times the pitch. There 
are certain combinations of pitch and slope that 
will not be accepted. The default values of pitch 
and slope are 43 and 128. To change the pitch 
and slope, use the format //rr yyy where xx is 
the pitch period and yyy is the slope level. There 
must be a space between the numbers. An ex¬ 
ample in a program statement would be: 

PRINT #l:"//30 96" 

Changing The Pitch 

The following is a sample program that illus¬ 
trates how the pitch and slope change the sound 
of the voice. I am trying different pitches from 0 
to 63 (and STEPping by 2 so it won't take for¬ 
ever). The slope S is calculated by taking the 
recommended factor of 3.2 times the pitch. 
Remember, you may try different slopes if you 
prefer. B$ combines the double slashes with the 
pitch, a space, and the slope, so line 170 can set 
the pitch and slope. Line 180 then speaks the 
phrase. 


00 REM PITCH AND SLOPE 
10 CALL CLEAR 

20 OPEN #5:"SPEECH”,OUTPUT 



Since other statements can be executed while 
a sound is playing, you can play a tone, then say 
a word. By changing the pitch and slope numbers 
for the speech, you can make the voice go higher 
or lower, and program a singing computer. 

Remember—I mentioned that working with 
speech involves a lot of experimentation. Singing 
takes even more time because there are many 
parameters that vary with each new tone. After 
you change the pitch and slope, you can try the 
inflection symbols and the punctuation marks to 
vary the voice even more. The TI with Terminal 
Emulator II can really create synthesized speech 
that sounds pretty good. 

Teaching The ABCs 

"Alphabet Song" illustrates simple singing on 
the computer. However, I did not spend a lot of 


time fiddling with the program and trying dif¬ 
ferent things to make the speech sound better. 

You may want to try spelling out the letter as a 
word, and you may want to add the inflection 
symbols and punctuation marks. I used different 
pitches for the singing, but kept the slope num¬ 
bers just 3.2 times the pitch. You could vary 
these numbers to get a more human sound and a 
better singing voice. 

My little boy has played a lot with the Early 
Learning Fun command module. One section 
teaches the letters of the alphabet, and the child 
finds the letters on the keyboard. My son is quite 
proficient at this and knows the names of the let¬ 
ters, but I realized he'd learned them in a ran¬ 
dom order. Most children learn the alphabet 
from the ABC song, but I had never sung it to 
him. I decided I'd let the computer sing it to him. 

Lowercase letters are used in the program 
because my son already knows the capital letters 
and really needs a little more practice with the 
lowercase letters. Schoolteachers often recom¬ 
mend learning the lowercase letters right along 
with the capital letters, and all beginning reading 
is in lowercase letters. 

Lines 120-200 define the lowercase letters. If 
you have saved the lowercase letters program 
from my August 1983 column, you can load that 
program, delete the PRINTing lines, then con¬ 
tinue typing this program. If you have any prob¬ 
lems running this program, the most likely cause 
is in typing the data in lines 160-200. Your 
actual error message will cite line 130 or line 
140, but those lines are dependent upon the 
DATA statements. Do not type a comma at the 
end of a line. 

Extra Option 

To hear the singing you will need the TI Speech 
Synthesizer and the Terminal Emulator II com¬ 
mand module. When you turn on the computer 
with the module plugged in, press any key to 
start, then press 1 for TI BASIC and program as 
usual. To run the program without speech, you 
can select option 2 when the program starts. In 
this case, you don't need the module or the 
speech synthesizer. 

If you choose no speech, the variable SP will 
equal 2. All the IF SP=2 THEN ... statements 
skip over commands that require the Terminal 
Emulator II module. The CALL SOUND state¬ 
ments play the tune. I used only one note; you 
may add accompaniment if you'd like. After the 
tone is played, the letter is sung. The CALL 
HCHAR or CALL VCHAR statements then place 
the letter on the screen. 

Lines 1880-1910 wait after the song is over 
until the user presses ENTER, then the song is 
repeated. 



If you prefer to save typing time and effort, 
you can obtain a copy of this program by send¬ 
ing a $3 copying fee, a blank cassette or diskette, 
and a stamped, self-addressed mailer to: 

C. Regena 
P.O. Box 1502 
Cedar City, UT 84720 

Please specify the name of the program and that 
you need the TI version. 


550 PRINT #l:"//27 86" 
560 PRINT #1s“E" 

570 CALL HCHAR(3,19,101) 
580 CALL SOUND(T,440,4) 
590 IF SP=2 THEN 610 

610 CALL HCHAR(2,23,102) 
620 CALL HCHAR(3,23,108) 
630 CALL SOUND<T*2,392,2) 
640 IF SP=2 THEN 670 
650 PRINT #l:”//30 96” 





CALL CLEAR 

OPEN #1:"SPEECH",OUTPUT 
CALL SOUND(T,262,2) 




520 

530 

540 


CALL HCHAR(3 
CALL SOUND(T 

CALL SOUND(T 



CALL HCHAR(3,11,99) 
CALL SOUND(T,392,4) 


CALL HCHAR(2,15,100) 
CALL HCHAR(3,15,97) 
CALL SOUND(T,440,2) 





200 CALL HCHAR(18,4,97) 
210 CALL HCHAR(19,4,113) 
220 CALL SOUND(T,392,4) 


250 CALL HCHAR<1 



























64 Searcher 

Krause, Assistant Technical Editor 
and'Michgel Jacobi 


"64 Searcher" is a time-saving utility that searches 
through your BASIC program and locates any 
character or string of characters that you choose. 
(This is a 64 version of VIC searcher that appeared 
in COMPUTE!, February 1983.) 


When you're working on a long BASIC program, 
it pays to plan ahead. But it seems that no matter 
how hard you try, you can't keep track of every¬ 
thing in your program. Can I use H to store the 
high score, or is that variable already being used 
for something else? Where is this subroutine 
called from? You probably end up searching for a 
certain number or word hidden among scores of 
program lines. 

"64 Searcher" allows you to spend less time 
searching and more time programming. You 
simply give it the string of characters to search 
for and it tells you the numbers of all lines in 
which the string appears. It can search 100 lines 
faster than it takes you to search one. It's fast be¬ 
cause it's written in machine language. But you 
don't have to know machine language to use it. 

Just LOAD it and RUN it, then LOAD your 
BASIC program. 64 Searcher doesn't use any 
BASIC memory, so you can work on your pro¬ 
gram normally. You can use 64 Searcher at any 
time by typing 0 followed by the string you want 
to find enclosed within either slashes or quotes, 
and hitting RETURN. This stores the string in 
your program as line 0. If your program already 
has a line 0, you will have to change that line 
number because the string must be the first line 
in the program. 

Then type SYS49152 and hit RETURN. In¬ 
stantly, you should see numbers appear on the 
screen. These are the line numbers that contain 
the string you specified. If no match is found, no 
numbers will be printed. If the string occurs 
more than once in a line, the line number is 


printed only once. 

Because BASIC commands are stored dif¬ 
ferently from other characters in a program, there 
are two ways of specifying the search string. If 
the string is enclosed within slashes, BASIC com¬ 
mands are recognized as such. If the string is 
within quotes, it will be treated as a literal string 
of characters. 

. For example, to find the BASIC statement 
AND, line 0 should be: 

0 /AND/ 

After entering SYS49152, 64 Searcher will find 
the AND in this line: 

10 IF X AND Y THEN 50 
but not in this line: 

20 PRINT "X AND Y" 

To find the AND in line 20 above, use quotes in¬ 
stead of slashes. 

Remember to delete line 0 before saving or 
running your program. 

64 Searcher 

Refer to the "Automatic Proofreader" article before typing this 
program in. 

10 F0RI=49152T049255:READJ:K=K+J:POKEI,J: 

20 IFKO16302THENPRINT" ERROR IN DATA STAT 
EMENTS":STOP :rem 117 

30 PRINT"(CLR)SYS49152 TO SEARCH" :rem 36 
100 DATA169,1,133,251,169,8,133,252,160,0 
,177,251,56,229,251,56 :rem 80 

110 DATA233,5,141,104,192,233,2,141,105,1 
92,160,0,177,251,170,200 :rem 142 

120 DATA177,251,240,67,133,252,134,251,16 
0,0,177,251,56,229,251,170 :rem 17 

130 DATA202,134,2,198,2,165,2,205,104,192 
,48,222,133,253,173,105 :rem 110 

140 DATA192,133,254,164,253,177,251,164,2 
54,217,5,8,208,229,198,253 :rem 45 

150 DATA198,254,208,239,160,2,177,251,170 
,200,177,251,32,205,189,169 :rem 88 

160 DATA32,32,210,255,76,26,192,96 













MACHINE LANGUAGE 


Decimal Mode 

Part 2 


Decimal mode is quite useful in arithmetic 
programming such as game scoring and simple 
accounting. It has other uses, too—for example, 
in converting binary numbers to decimal for out¬ 
put. It also has certain bugs, pitfalls, and 
conventions. 

Bugs And Pitfalls 

Don't depend on the Zero and Negative (Z and 
N) flags immediately following a decimal addi¬ 
tion (ADC) and subtraction (SBC). If you really 
need them, perform a data transfer (for example, 
TAX) to insure the flags are set correctly. The 
Carry flag is correct and has its usual meaning 
after the addition or subtraction. 

Remember that decimal mode uses only the 
ADC and SBC instructions. The increment and 
decrement instructions (INX, INY, INC, DEX, 
DEY, DEC) behave in binary; and comparisons 
(CMP, CPX, CPY) are based as usual on binary 

Programmers using machines with interrupt 
sequences must be careful of decimal mode. The 
interrupt can clear decimal mode with CLD 
(Clear Decimal); when the interrupt code finishes 
with RTI, the status register will be restored and 
decimal mode will be reinstated if it was in effect 
before. On Commodore machines, the interrupt 
sequences do not include a CLD instruction; in 
this case, the interrupt should be locked out 
using a SEI (Set Interrupt Disable) before going 
into decimal mode. 

The VIC-20 and Commodore 64 have a use¬ 
ful feature: Registers may be preset before a SYS 
call. Addresses $030C, $030D, $030E, and $030F 
(decimal 780 to 783) contain values that will be 
transferred to registers A, X, Y, and the status 
register at the time of a SYS. When the machine 
language program returns to BASIC, these same 
addresses will contain the contents of the respec¬ 


tive register. In other words, we could POKE 
780,65 followed by a SYS; and the machine lan¬ 
guage program would start running with a value 
of $41 (decimal 65) in the A register. 

What does this mean to decimal mode? 
Here's the possible danger: If the wrong value is 
contained in address 783, it will be transferred to 
the status register at the time of a SYS. An un¬ 
controlled value might set decimal mode, or even 
worse, set the interrupt disable flag. To make 
things worse, these flags will not be restored 
when we return to BASIC. They will be neatly 
stored in 783, but BASIC will resume with the 
flags in an unworkable state. There goes BASIC. 

It's probably wise to leave address 783 
alone. If it worries you, POKE 783,0 before 
giving a SYS command. 

Conventions 

We can handle fractions in decimal arithmetic. 

It's best to do this by using an "assumed decimal 
point." In other words, we will work dollar val¬ 
ues as an integer number of pennies, and kilome¬ 
ters as integer values of meters. It's easier to stick 
in the decimal point at output time. 

Negative numbers are a little tricky. We can 
use a scheme similar to that in binary numbers: 
That is, the "high bit" of a number represents 
the sign. This, however, splits positive and neg¬ 
ative unevenly: A two-byte number will range 
from a low of -2000 (value 8000) up to +7999. 
If you use this method, don't forget that the N 
flag isn't dependable after an addition or subtrac¬ 
tion and that you'll need to take an extra step to 
test the flag. 

A better technique is called "tens com¬ 
plement" and it's been used in many household 
devices such as counters on tape recorders. We 
understand that a reading of 9994 really means 
—6. If we want to use this technique, we might 



choose to try to split positive and negative more 
evenly, so that a two-byte number would range 
from —5000 to +4999. In this case, we must 
remember not to use the N bit, but instead com¬ 
pare the high byte to 50 hex. If it is higher, the 
number is negative. 

If “tens complement" is used, remember to 
invert a negative number at the time of printing. 

I find that the easiest way to do this is to sub¬ 
tract it from 0000 so that 9993 becomes 0007. 

Multiplication 

To multiply two decimal numbers we are almost 
forced to resort to repeated addition. As we go 
from one decimal digit to the next, we must 
"shift" either the multiplier or the product: This 
is a binary shift-four-places. It's awkward and we 
can quickly see why binary is preferred. 

There's an elegant way to multiply a decimal 
number by a binary value, or by a fixed amount. 
We can use what I call a "decimal shift." 

A binary shift multiplies a number by two. 
We can do the same thing with a decimal num¬ 
ber by adding it to itself. Thus, to multiply by 
two we add the number to itself (in decimal 
mode). To multiply by four we multiply by two, 
twice. To multiply by five, we multiply by four 
and add the original number. 


A Multiplication Example 

We'11 have the computer (PET, VIC, or 64) out¬ 
put a table of multiples of the number 5. (Two 
would be too easy.) 


033CA2 01 
033E 8E B0 
0341 CA 
0342 8E B1 
0345 8E B2 
0348 8E B6 

034B A0 02 
034DB9 B0 
0350 99 B3 
0353 88 
0354 10 F7 


0359 A0 FD 
035B 78 
035C F8 
035DB9 B3 
0360 79 B3 

0366 C8 
0367 DO F4 
0369 CA 
036AD0 EC 

036CA0 FD 



; copy the number 
LOOP LDY 
03 CP LDA 


STA 

DEY 

BPL 


#$01 

LOW 

MED 

HIGH 

COUNT 

#$02 

LOW,Y 

COPY,Y 

CP 



02 TP 
02 


; add origin 


ADC 
STA 
INY 
BNE 
DEX 
BNE 
tal valu 
LDY 


HIGH-255,Y 

HIGH-255,Y 

HIGH-255,Y 


FP 

#$FD 


0375 99 B3 
0378 C8 



037C 58 

037DA0 02 
037F B9 B0 
0382 4A 
0383 4A 


02 


; print the 
03 LP 


STA HIGH-255,Y 
INY 

BNE AP 

CLD 

CLI 

LDY #$02 
LDA LOW,Y 
LSR A 


0384 4A LSR A 

0385 4A LSR A 

0386 09 30 ORA #$30 


0388 20 D2 FF JSR $FFD2 

038BB9 B0 03 LDA LOW,Y 

039E29 OF AND #$0F 


0392 20 
0395 88 
0396 10 

0398 A9 
039A 20 


D2 FF JSR $FFD2 

DEY 

E7 BPL LP 

; print RETURN and loop 
0D LDA #$0D 

D2 FF JSR $FFD2 

B6 03 INC COUNT 

B6 03 LDX COUNT 

07 CPX #$08 

A4 BNE LOOP 


Note the peculiar addressing in lines 035D to 
0363 and again in 036F to 0375. We need to 
have a positive-incrementing index (in this case 
Y), since we must start our addition at the low- 
order value, LOW, and work upwards. We can¬ 
not use the obvious method of starting at zero 
and testing to see when we have done all three 
values, because we want the carry flag to be pre¬ 
served; CPY (Compare Y) would destroy the pre¬ 
vious value of the carry and our addition 
wouldn't work right. 

If you'd rather enter the program from 
BASIC, here's the same program in DATA state¬ 
ments. It will work on all Commodore machines. 


Multiples Of 5 

100 DATA 162,1,142,176,3,202,142,177,3 
110 DATA 142,178,3,142,182,3,160,2 
120 DATA 185,176,3,153,179,3,136,16,247 
r\»mm - "4,160,253,120,248,185,17 


179,2,153,179,2,200,2 


179,2,200,208,244,216,88,160 
176,3,74,74,74,74,9,48,32,21 
176,3,41,15,9,48,32,210,255, 


036F B9 B3 02 AP LDA HIGH-255,Y 
0372 79 B6 02 ADC COPY-253,Y 










64 EXPLORER 


Larry !saccs 


This month we will continue our look at printing 
characters to a bitmapped display. Last month 
we looked at a method which transferred a 
character dot pattern to the bitmapped display. 
This month we will look at a second method, 
which draws the characters. 

Printing Bit By Bit 

With the appropriate set of line segments, virtu¬ 
ally any character shape can be drawn. The 
characters do not necessarily have to look like 
the standard ASCII character set. In addition, 
you are not restricted to a feed character cell. 
Each character can be as complex and as large as 
you like. For this flexibility, you do lose a few 
advantages offered by the use of character dot 
patterns. (It becomes a little more difficult to 
print in reverse video and will likely take a little 
longer to print the character when characters are 
drawn rather than transferred.) 

With the drawing method, we will need to 
make use of a line-drawing routine. For conven¬ 
ience, I will be using the machine language line¬ 
drawing routines presented in the May issue of 
COMPUTE!. However, for use in the example 
BASIC program which follows, almost any line¬ 
drawing routine will suffice. (The one found in 
COMPUTERS earlier "SuperBASIC 64" program 
could be used if you desire. Some minor 
modifications to the BASIC program will be re¬ 
quired, though.) 

To draw a given character in the bitmapped 
display, we will need some data to define how 
the character should be drawn. Unlike the trans¬ 
fer method, where the format for such data is al¬ 
ready fixed, here we have total freedom to define 
our own format. The format must specify what 
line segments should be drawn to form the 
characters. This means that the data must define 
the starting and ending coordinates of each line 
segment. Another thing to note is that the data 
will need to define these coordinates relative to 
the previous coordinates. By specifying the next 
point based on the previous point, the character 
can be drawn anywhere in the bitmapped display. 

To simplify the following discussion, I will 
use the term "vector" to refer to the line seg¬ 
ments which make up a character. Also, I will 
use the term "vector string" for the data which 


defines how to draw a character. 

One way we could define the format of the 
data in the vector string is to specify each vector 
with two pairs of relative coordinates. A single 
byte could be used for each relative coordinate, 
which could represent a value from 127 to —128. 
Thus, four bytes would be required for each vec¬ 
tor in the vector string. 

Moving Points 

As I mentioned in the May column, I prefer to 
have the draw function continue from each pre¬ 
vious endpoint. This eliminates the need to spec¬ 
ify a new beginning point every time. The catch 
is that there must be some way of moving the 
last endpoint without drawing. Assuming we de¬ 
fine a way of moving the endpoint for our vector 
string, then it will be possible to specify a vector 
using one pair of relative coordinates, rather than 
two. For this to be an advantage, a fair percent¬ 
age of the vectors would need to draw from the 
end of the previous vector. When creating 
characters from vectors, I believe this will gen¬ 
erally be true. 

If the characters are not going to be that 
large, there is another phenomenon: Most of the 
vectors will be fairly short. Assuming they are 
typically short enough, we could save more bytes 
by using one byte to specify a vector. The byte 
could be split into an upper and lower four bits, 
with each half able to represent a relative co¬ 
ordinate of 7 to — 8. This may not seem like very 
much, but if the vector isn't too long to be repre¬ 
sented by two of these bytes, we haven't lost 
anything. 

Vector Bytes 

This isn't the only way to use a single byte to 
specify a vector. The byte could be split into two 
parts so that one part specifies a direction and 
the other a distance. The direction in this case 
would most likely be a multiple of 45 degrees. 
This actually works quite well for drawing 
characters. However, I will go with the format of 
putting relative coordinates into the byte. I will 
refer to such bytes as "vector bytes" in the dis¬ 
cussion which follows. 

Given that the vector has a limited range, 
we will need to define some way of invoking 



exceptions to handle the times when the range is 
exceeded. Also, we still need to define a way of 
moving instead of drawing, which we will also 
treat as an exception. One way to do this is to 
use one of the coordinate values to signal the 
exception. The other relative coordinate could be 
used to indicate which exception. Since this uses 
both halves of the vector byte, the exceptions 
will require additional bytes. 

Now we are ready to get down to specifics. 
Let's try putting the relative coordinate for X in 
the upper half of the vector byte. Naturally that 
means putting the relative coordinate for Y in the 
lower half. As for a value to signal exceptions, it 
is most logical to choose a value at an extreme. 
Since our range is from 7 to —8, —8 would be 
the best choice. It also would be best to have this 
value in the upper half of the vector byte. This 
would cause the exception bytes to fall in the 
range of 128 to-143. Bytes outside this range will 
be regular “drawing" vector bytes. 

There are four exceptions we will need to 
deal with initially. These exceptions are for 
signaling a move, an extended draw, an extended 
move, and the end of the vector byte string. With 
the upper half signaling an exception, this leaves 
the lower half to flag the exceptions. 

Also, the numbering of the exceptions will 
be a little easier if we treat the four bits as un¬ 
signed rather than signed. This lets us have val¬ 
ues from 0 to 15, instead of 7 to —8. For the 
exceptions, let's try values of 0, 1, and 2 to select 
move, extended draw, and extended move, re¬ 
spectively. To mark the end of a vector byte 
string; let's try 15, to choose an extreme again. 
The following table summarizes these choices: 


Data Formats For Vector Byte String 

Vector Byte 

1 I DX I DY I DX = 7 to -7 

DY - 7 to -8 

Move Exception 

2 I DX I DY I DX,DY = 7 to -8 



Drawing Strings Of Characters 

Now we are ready to implement the above in a 


BASIC program. The result is shown in Program 
1. The task of drawing the character has been 
split into a number of routines. One routine 
fetches the next vector byte, and another unpacks 
the relative distances. There is also a separate 
routine to handle vector byte draws, vector byte 
moves, extended draws, and extended moves. Fi¬ 
nally, there is a routine which draws a character, 
and which in turn uses that routine to draw a 
string of characters. 

The vector byte data included in Program 1 
defines vector byte strings for characters 65 
through 90, or A through Z. The vector byte 
strings will draw the ASCII character correspond¬ 
ing to the character code. The space character is 
also defined. The vector byte strings are stored in 
the string array VB$ and are accessed by using 
the character code as the subscript into the array. 
Prior to running the program, it will be necessary 
to load the line-drawing routines presented in 
the May column. 

Character Rotation 

I have included a routine which lets you specify 
a character rotation in increments of 90 degrees. 
For drawn characters, the rotation involves simply 
negating or swapping the relative coordinates 
specified in a vector byte. Rotating the trans¬ 
ferred character pattern is not too difficult pro¬ 
vided the cell is square, as it is in our case. 
Rotating the character to other angles typically 
won't produce desirable-looking characters, and 
may be too complex to implement. 

The following is a table showing the routines 
that are available, and what their start address is. 
define the base location of the second jump table. 
Here is a list of the routines: 

Since this will be the second jump table (to com¬ 
plement the line-drawing jump table), I use J2 to 

Loc. Description 

J2+0 SET PUT CHAR. DATA LOCATION 
J2+3 PUT CHARS. IN BITMAP (TRANSFER 
METHOD) 

J2+6 SET DRAW CHAR. DATA LOCATION 

J2+9 DRAW CHARS. IN BITMAP 

J2+12 SET ROTATION 

J2+15 NOT USED YET 

J2+18 NOT USED YET 

J2+2X NOT USED YET 

The jump vector location of these routines is 
shown as the variable J2 plus an offset. To obtain 
the actual address, J2 should be set to the base of 
the jump table which is 50176 or C400 hex. The 
following list gives the syntax for using each of 
the defined routines in the jump table: 

SYS J2,LOC 

SYS J2+3,CHAR or STRING 




SYS J2+6,LOC 

SYS J2+9,CHAR or STRING 200 

SYS J2 + 12,ROT 210 

ROT: 0=NO ROT., 1=90 DEGREES 
2=180 DEG., 3 =270 DEG. 220 

Both the put character 02+3) and draw 230 

character 02+9) will accept either a single 240 

character or a string of characters as an argu- 300 

ment. If the argument supplied is a numeric 310 

value, it will be interpreted as the ASCII value of 320 
a single character. If the argument is a string, the 
entire string will be printed. 

The location required by the put character 
routine should be the base address of the charac¬ 
ter dot patterns to use. The location required by 
the draw character routine is the base address of 
a 256-byte table containing pointers to 128 vector 
byte strings. The pointers to the vector byte 
strings are each two bytes, stored as low byte fol¬ 
lowed by high byte. Use of a table is necessary 
because the length of each string may vary, mak¬ 
ing it impossible to calculate the locations of the 
vector byte strings directly. 


140 RETURN 

200 REM UNPACK VECTOR BYTE 
210 DY=VBAND15: ' 


DYAND8 THEN DY=DY 


330 RETURN 

400 REM EXECUTE VECTOR B 
410 GOSUB 100:GOSUB 200: 


440 RETURN 

500 REM GET EXTENDED D 
510 GOSUB 100:DX=VB:RE 


530 GOSUB 100:D 


EXTENDED D 


Safe Entry 

Program 2 will POKE the machine code for the 
character routines into the proper locations. Like 
the program which POKEs the line-drawing 
routines, that last number in each data line is the 
sum of the previous eight bytes on the line. Pro¬ 
vided you don't make two errors which cancel 
each other, the program will report any lines that 
have mistakes in them. If there are no detected 
errors, a SUCCESSFUL LOAD is reported. 

Program 3 provides a simple illustration of 
the use of the character routines. For vector byte 
data, add the DATA statements shown in Pro¬ 
gram 1, which will define ASCII characters A 
through Z, and space. The vector byte data will 
be placed at the top of BASIC's free RAM, after 
1024 bytes of space is reserved from BASIC. You 
will be able to see the increase in speed over the 
BASIC routines. 


Program 1 : Draw Characters In A Bitmap 

Refer to the "Automatic Proofreader" article before typing this 
program in. 

10 REM DRAW CHARACTERS IN BIT-MAP:rem 212 
20 JT=49152:REM DRAWING JUMP TABLE:rem 16 
30 DIM VB$(256):REM DIM. STRING ARRAY 



90 GOTO 1000 

100 REM GET NEXT VECTOR BYTE 
110 VP=VP+1:REM BUMP POINTER 
120 IF VP>VL THEN VB=0:RETURN 
130 VB=ASC(MID$(VB$,VP,1)):REM 

124 COMPUTB August 1984 




















































On The Road With Fred D’lgnazio 


Are Computers 
A Home Appliance? 

tt&g 1 Fred D Ignazio Associate Editor 


Necessary, Easy, And Inexpensive 

In recent columns I have written about a growing 
consumer awareness that things are not right 
with the microcomputer industry. Some mislead¬ 
ing advertisements have made people buy 
computers as a home appliance. Unfortunately, 
the computers have not met some people's 
expectations, and then ended up gathering dust 
in the closet. 

To be a legitimate home appliance, a product 
should have three characteristics: 

It should be inexpensive. 

It should meet a real need. 

It should be easy to use. 

Let's look closely at each characteristic, and 
see how computers measure up. 

A home appliance should be inexpensive. A 
low-end computer often appears to be inexpen¬ 
sive, but it turns out to be costly after a person 
adds the necessary “extras," including a disk 
drive, a printer, and some basic software. 

A home appliance should meet a real need. For 
example, people use telephones to communicate; 
TVs for entertainment and hews; ovens to cook 
food; and refrigerators to keep food fresh. But 
what do people need computers for? 

A home appliance should be easy to use. For 
example, you can pick up a phone, dial seven 
numbers, and reach another person within sec¬ 
onds. You can push a button on a TV, and the 
world enters your living room. You can pull 
down a lever on the toaster oven and get a hot 

When you turn on the computer, it says, 
"READY." But it is not really ready. First you 


must load in additional software, turn on addi¬ 
tional appliances (disk drives, a printer, a 
modem, etc.), answer questions, and type in 
additional information. All these cumbersome, 
time-consuming steps make the computer ready, 
but they do not make it easy to use. 

WASH! Magazine 

How do people learn how to use computers? 

They might join a user group, ask a kid, or 
read a computer magazine. 

A magazine like COMPUTE! can be a lifesaver 
for the consumer who has just bought an in¬ 
expensive computer. The magazine offers easy- 
to-read tutorials, practical tips, and lots of 
excellent, affordable software. 

Kids can also be helpful. So can user groups. 
But all this is beside the point. The real question 
is: Should a home appliance be this difficult to 

To put this question in perspective, ask 
yourself how many people would own a washing 
machine if, to operate it, they had to buy a 
monthly magazine called WASH! , and they had 
to get help from a washing-machine whiz kid 
and attend weekly meetings of the Whirlpool 
User Group? 

And how fair is it to our children to assume 
that they will know how to use a machine that 
has us puzzled and bewildered? 

It is easy for kids to get intimate with 
computers, because they share few of our fears, 
anxieties, and prejudices about these machines. 
But it is not nearly as easy for them to get com¬ 
puter literate —to be competent computer users 
and programmers. Nevertheless, we adults now 



























64 Error 
Suppression 

, Tom Nuss 


There are times when you don't want error messages 
(and the resulting interruption) in a program. Here's 
how to avoid some kinds of system freezes. 


While constructing a general graphing program 
that would handle varied equations, I realized 
that it would crash when it tried to divide by zero 
or take the square root of a negative number. Since 
a graphing program depends on drawing a fairly 
smooth curve, these two possibilities would defi¬ 
nitely occur from time to time in a general pro¬ 
gram loop that plots. I also found I had to learn 
machine language to get things to happen before 
my hair turned gray. 

After delving into the BASIC interpreter with 
my trusty Supermon-64,1 discovered that if the 
accumulator contained a zero after a division, it 
would branch to the error routine at $A437, which 
would jump indirectly (via a vector address in 
$300 and $301) to $E38B and proceed to print mes¬ 
sages and stop the BASIC program. 

I soon confirmed that all error messages (at 
least the ones I tried) went through $A437, then 
jumped indirectly by the bytes loaded in $300 and 
$301 to $E38B. All I had to do was change the 
contents of $300 and $301 to an address pointing 
to where I would have my own routine that would 
skip over the error to allow the program to 
continue. 

Back To BASIC 

Simple enough, but how to get back in the BASIC 
program at the right spot once I left? No, not back 
into the interpreter again; anything but that! 

I noticed that just down the page of the mem¬ 
ory map at $A906 was the routine “Scan for next 
statement." Now that I look back on it, I should 


have started there. Needless to say, that entry 
point was the last of the major pieces to the puzzle 
of skipping the BASIC error handler. 

To get down to the mechanics, I have made 
up a demonstration program to illustrate the 
method to bypass arithmetic errors. If you type in 
the program and RUN, you will get the results 
shown in the figure. AC SR XR YR are the Ac¬ 
cumulator, Status, X, and Y registers respectively. 
Directly beneath them are several series of four 
numbers and either SYNTAX OK or a variation of 
F(#) = a number. 

Ignoring the first line of eights and SYNTAX 
OK for the moment, you will notice that line 70 in 
the program defines the function SQR(4-Ct2)/C 
and that the second line of numbers in the figure 
is 255 49 14 1. When one has C=^3 in the above 
equation, mathematicians will shake their heads, 
and the computer should crash. Why didn't it? In 
fact it even gave an answer for SQR(-5)/-3 and 
blithely continued to calculate the rest of the F(C)s 
from-3 to 3. F(-2), F(-l), F(l), and F(2) give the 
correct answer, while F(-3), F(0), and F(3) don't. 

Remember, our objective is to skip dilemmas 
like division by zero, so we must first find out if 
that is what the computer is trying to do. The 
way to do this is to look at line 10, which POKEs 
addresses 768 and 769 ($300 and $301) with 52 
and 3 (or $34 and $03). These are the bytes indi¬ 
rectly used to tell the error routine where to go 
after it finds an error; normally these bytes contain 
the address $E38B, but line 10 changes this to 
address 820 decimal ($334). This is where our 
machine language routine is POKEd by line 20. 
Line 230 changes things back to normal after the 
program is finished. For those of you who wish to 
see the disassembled machine language routine. 



STA $FB 

PHP 

PLA 

STASFC 
STX$FD 
STY $FE 
PHA 
PLP 

LDA $FB 
JMP $A906 

The above routine is only used when there is 
an error. Locations 251-254 ($FB-$FE) are loaded 
with eights at the start (line 10) and loaded again 
each time through the loop that calculates F(C). 
However, if an error occurs in line 150, the error 
routine will load locations 251-254 with the con¬ 
tents of the registers at the time of the error and 
then continue with the next BASIC line. Line 160 
prints out the contents of the registers and F(C). 
Thus the contents of 251-254 change only when 

So, now the program doesn't crash; it just 
gives erroneous results, and that should also be 
avoided. Type in: 

185 IF PEEK(252)> = 48 THEN PMNTtGOTO 200 
RUN the program again and there should be 
blanks where F(—3), F(0), and F(3) are involved. In 
other words, by PEEKing 252 and by comparing it 
to 48 we have skipped the errors; nothing has 
been printed, saved, recorded, or crashed. Only 
the proper numbers are still able to be used. 

So much for mathematics. What if we define 
the function wrongly? LIST the program and 
change line 70 to: DEFFNF(C) = SQR(4 - Ct2/C 
and RUN. If all is not well you should see a line of 
four numbers, not eights, a SYNTAX ERROR (70) 
and line 70. Our error routine kicked in and in 
line 100 checked location 252 to see if it was less 
than 112 and told you about the error in syntax. 
This is really no advantage oyer the regular sys¬ 
tem, but if you are using the dynamic keyboard 
method to enter your DEFFNF(C) (see "Bootmaker 
for VIC, PET, and 64," COMPUTE!, May 1983), this 
routine would come in mighty handy. 

Errors That Get Through 

It should be pointed out that there is a potential 
problem with this routine. Change line 70 to 
DEFFNF(C) = SRR(4-C 12)/C. Errors galore, but 
they weren't caught. Why not? I wish I knew. 
Please, not the BASIC interpreter again. All I can 
say is that in an instance like this you will, on 
most occasions, be able to tell there is an error 
and that the error is being caused by the DEFFN 
statement. Also, before including this specific 
Syntax Error routine in a program of your own, 
you should try putting a multiply sign (*) before 
the SQR in line 70 and then RUN. As you can see, 
the computer locks up. The only way to correct 
this situation is to turn the power off and reload 


the program. Weigh the advantages of including 
the Syntax Error routine described here against 
the very obvious disadvantage of system lockup. 

To sum up: 

1. POKE 768 and 769 ($300, $301) with the 
address of your machine language routine that 
will handle the BASIC errors. In the example 
presented here, 52 and 3 are POKEd, for location 
820 ($334). 

2. The error handling routine loads byte 252 
($FC) and provides the jump address to "Scan for 
next statement" at $A906 so you can reenter your 
program. 

3. Check byte 252 (Status Register during an 
error) to see if it is greater than or equal to 48 for a 
mathematical error or 112 for a syntax error. 

4. Take the appropriate action either to save 
an answer or to skip it. 

5. POKE 768 and 769 with 139 and 227 
respectively to restore the normal error vector 
address ($E38B). This is important since the com¬ 
puter won't be able to function in the immediate 


Error Suppression 

10 P0KE768,52:P0KE769,3:FORC=0TO3:P0KE251 
+C # 8: NEXTC : rem 108 

20 FORC=0TO16:READD:POKE820+C,D:NEXTC 

:rem 58 

30 FORC=0TO17:PRINTCHR?(96);:NEXTC:PRINTC 
HRS f105 I rem 51 

IB (10) ; "XR" ;TA 


60 PRINTCHR?(145);TAB(18);CHR?(177) 

70 DEFFNF(C)=SQR(4-Ct2)/C rrem 206 

80 SX=FNF(1) irem 172 

90 PRINTPEEK(251);TAB(4);PEEK(252);TAB(9) 
;PEEK(253);TAB(14);PEEK(254); :rem 27 

100 IFPEEKt252)<112THENPRINT"13 SPACES)SY 
NTAX OK":GOTO120 :rem 134 

110 PRINT"{3 SPACES 1 SYNTAX ERROR (70)'':GO 
TO230 :rem 148 

120 FORC1=0TO38:PRINTCHR?(96);:NEXTC1:PRI 


140 C?=STR?(C) :rem 2 

150 X=FNF(C) :rem 1 

160 PRINTSTR?(PEEK(251));TAB(4)JSTR?(PE 
(252));TAB(9); :rem 1 

170 PRINTSTR?(PEEK(253));TAB(14);STR?(P 
K(254)) :rem 

180 PRINTCHR?(145);TAB(20);"F("C?")="; 

190 PRINTX : rem 1 

200 FORC1=0TO38:PRINTCHR?(96);:NEXTC1:P 
NT : rem 2 

210 FORC1=0TO3:POKE251+C1,8:NEXTC1:rem 
220 NEXTC :rem 

230 POKE768,139:POKE769,227 :rem 

240 IFPEEKt 252)>=112THENLIST70 :rem 

300 DATA 133,251,8,104,133,252,134,253, 
2,254,72,40,165,252,76,6,169:rem 6! 




Hi-Res 

VIC Drawing 

Jjpl 3effWil? JK 


There comes a time when programmers want more 
subtle graphics than can be achieved with charac¬ 
ters and low resolution. Do you ever feel like creat¬ 
ing swirling, intricate webs of delicate, slender 
lines? Here's how to achieve high resolution on 
the VIC. 


The designers of the VIC-20 thoughtfully in¬ 
cluded in the VIC chip a special programmable 
character generator. Though mainly intended for 
creating custom alphabets and symbols, it can 
also be used to generate an entire high-resolution 
screen. 

Each character that the VIC puts on the 
screen, whether user-defined or standard, is 
stored in eight bytes of memory. Each byte de¬ 
fines one of the eight rows that comprises a VIC 
character. Furthermore, each of the rows is split 
up into eight sections corresponding to the eight 
bits in that row's byte. If a bit is on (there is a 1 
in its location), then its chunk of the row is lit 
up. If a bit is off (it contains a 0), then its chunk 
of the row is blank. 

Character Matrices 

"Microdraw" sets up a matrix of 12 X 15 custom 
characters, all of which are initially made blank 
(by POKEing 0 into the defining bytes). Since 
each character is defined by eight bytes of eight 
bits each, we have a total of 11,520 bits, or dots, 
on the screen which we can turn on or off at 
will. To light up a dot, simply POKE a 1 into its 
corresponding bit. 

Such high resolution comes at a price. In or¬ 
der to use custom characters, we first must set 
the character memory apart from the BASIC pro¬ 
gram area. Since we are using so many charac¬ 
ters, a lot of memory is consumed—1.5K, nearly 
half the memory available in an unexpanded VIC. 


Now that we've covered the theory, it's time 
to enjoy your VIC's hi-res capability. Type in 
Microdraw, save it, then run it. Plug in your joy¬ 
stick, if you have one. Select the foreground and 
background colors for the drawing area by press¬ 
ing the number key with the appropriate color 
on it. The program will then set up the drawing 
area and display the cursor. You control the 
cursor by moving the joystick in the direction 
you want the cursor to go. 

Initially, the cursor is in the erase mode, 
which means that the cursor does not create a 
line as it travels and will erase any line it comes 
in contact with. In this mode the TV speaker 
emits a low beeping tone. 

To change to the drawing mode, press the 
fire button on the joystick. The TV speaker will 
then beep in a higher-pitched tone, and the 
cursor will leave a line as it travels. To change 
back to the erase mode, simply press the fire but- 

The SAVE Function 

The function keys offer three additional options: 
The fl key erases the drawing screen and leaves 
the cursor in position; f3 starts the program from 
the beginning and resets all variables; and f5 
causes the program to jump to a screen-saving 
routine. The saving routine is self-explanatory, as 
is the retrieval routine. To replay the data you 
have stored, choose selection 2 ("load an old 

If you do not have a joystick, a simple 
modification will allow you to use the keyboard 
instead. Delete lines 330 and 340, and change 
line 320 to read: 

320 A=PEEK(197):J0=-(A=44) t Jl=- (A=36 ) : J2= 
-(A=20):J3=-(A=12):IF A=32THENB=ABS(B 
-1) rem 155 





















ML 

Applesort 

Richard Salley_ 


A machine language program is necessary when 
sorting large amounts of data. "ML Applesort" is a 
machine language utility that will quickly sort an 
array of any length. 


In COMPUTE! (September 1982), David Lummis 
presented an excellent machine language sort 
routine for PET/CBM computers. "ML 
Applesort" is a modification of Lummis's pro¬ 
gram for the Apple. 

The original program has been compressed 
to fit it into page 3 of memory. This is a safe area 
for ML programs so you do not have to worry 
about overwriting the routine with a long pro¬ 
gram or numerous and lengthy string arrays. The 
zero page locations used for temporary storage, 
counting, and address indexing were chosen be¬ 
cause most of these locations are used primarily 
in connection with hi-res graphics, and it is un¬ 
likely such programs will be used concurrently 
with a sort utility. 

ML Applesort makes use of the Apple's spe¬ 
cial & command. When the BASIC interpreter 
encounters the & in a program, it goes to loca¬ 
tion $3F5 (1013 decimal) and then performs an 
unconditional jump to the address contained in 
$3F6 and $3F7. In this program, 0 is placed in 
$3F6 (1014 decimal) and 3 is placed in $3F7 
(1015 decimal). This will cause a jump to loca¬ 
tion $300 (768 decimal), which is where the ma¬ 
chine language routine begins. 


The first instruction at $300 is a JSR (Jump 
to SubRoutine) $F7D9. This is a monitor subrou¬ 
tine that fetches the address of a string and 
stores it in locations $9B and $9C. By placing the 
name of the string array we want sorted immedi¬ 
ately after the &, this routine will tell us where 
in memory that array is stored. The correct for¬ 
mat for calling the ML sort routine from BASIC 
is as follows: 

100 &X$ 

where X$ is the name of the array to be sorted. 
When the routine returns to BASIC, the named 
array will be sorted alphabetically in ascending 
order. How the program does the sorting can be 
understood by studying a disassembly. To enter 
the program, use the BASIC Loader (Program 1). 

After placing the program into memory by 
running Program 1, save it to disk by typing: 

BSAVE APPLESORT, A$300, L$FF 
You can then BLOAD the sort routine and use it 
with any of your own BASIC programs. 

Program 2 shows how easily the program 
can be used and how quickly it can sort an array 
with strings of varying lengths. I'm sure COM¬ 
PUTE! readers with Apple machines will find nu¬ 
merous applications for this useful utility. 


Program 1 : ml Applesort 

100 REM ...ML APPLESORT 

110 REM ...POKE S> JUMP ADDRESS 



t Oi POKE 10 


120 

130 

140 


POKE 1013,761 POKE 1014, 
15,3 

REM ...POKE ML 


FOR ADDR - 76B TO 94li READ CODEiC 
KSUM - CKSUM + CODE* POKE ADDR,COD 
E* NEXT 


150 

768 

776 

784 

792 

800 

808 

816 


856 

864 

872 


904 

912 

920 

928 

936 


IF CKSUM < > 26104 THEN PRINT "E 

RROR IN DATA STATEMENTS"i STOP 
DATA 32, 217, 247, 165, 155, 133, 
1, 165 

DATA 156, 133 
133 

DATA 208, 200 


1, 105, 


105 

DATA 0, 133, 
225, 165 
DATA 236, 12 
105, 3 

DATA 133, 235 
133, 236 
DATA 160, 


, 133, 235, 165, 

36, 165, 235, 133, 

., 24, 165, 225, 


4, 165 
DATA 210, 105 

211, 105 
DATA 0, 133, 

212, 165 

DATA 210, 197 
, 212, 208 
DATA ' “* 


77, 225, 208, 
133, 210, 


, 174 


DATA 133, 213 
, 133, 214 
DATA 200, 


, 177, 235 
DATA 133, 2; 
209, 237 
DATA 144, : 
00, 196 


DATA 2, 177, 
145, 225 
DATA 104, 14S 
169, 1 

DATA 133, 212 


169, 0, 133, 


Program 2: ML Applesoft Demo 

10 REM . . . SORT DEMO 
20 IF PEEK (768) - 32 THEN 40 
30 PRINT CHR» (4)|"BLOAD APPLESORT" 
40 HOME i VTAB Si PRINT “POINTER SORT 


120 NEXT l NEXT 

130 FOR F - 1 TO Nl PRINT R*(F),i NEXT 

140 PRINT l INPUT “PRESS <RETURN> TO 8 
ORT “|XX* 

150 PRINT l PRINT “SORT BEGUN" 

160 & R« 

170 PRINT l PRINT “SORT FINISHED!!" 

180 PRINT l INPUT "PRESS <RETURN> TO P 
RINT SORTED LIST "|XX* 

190 FOR F - 1 TO Nl PRINT R*(F),l NEXT 

200 PRINT l PRINT "END OF DEMO"l END © 

To receive I 

additional 
information 
from advertisers 
in this issue, 
use the handy 
reader service cards 
in the back 
of the magazine. 


This Publication 
is available in Microform. 



University Microfilms International 


DEMO" 

50 VTAB 7i INPUT "ENTER # OF STRINGS T 
0 SORT "|N 
60 DIM R*<N> 

70 B* - "ABCDEFGHIJKLMNOPQRSTUVWX YZ" 

80 FLASH i PRINT « PRINT "BUILDING STR 



90 NORMAL 

100 FOR F - 1 TO NiX ■ INT < RND (1) * 
7) .+ 2i FOR G - 1 TO X 
110 R*<F> - R*(F) + MID* (Be, INT < RND 





































Questions Beginners Ask 


Are you thinking about buying a computer for the 
first time, but you don't know much about comput¬ 
ers? Or maybe you just purchased a computer and 
are still a bit baffled. Each month in this column, 
COMPUTE! will answer questions frequently asked by 
beginners. 


QIs it safe to plug a whole home computer 
system into a single wall socket? I'm 
talking about a computer, TV, cassette re¬ 
corder, disk drive, printer, and a modem. Will 
it blow a fuse? Or will I have to run extension 
cords from nearby wall sockets for some of the 
peripherals? 

A As long as no other power-hungry appliance 
is on the same socket, plugging a whole 
home computer system into one outlet is per¬ 
fectly safe. Home computers and their periph¬ 
erals actually don't use very much electricity at 
all. In fact, the typical home computer consumes 
less power than the light bulb you'll burn to see 
it by. 

For instance, one of our editors has a com¬ 
puter system at home which consists of an Atari 
800 with 48K of memory, a disk drive, a cassette 
recorder, an Atari 850 Interface Module, a color 
monitor, an 80-column dot-matrix printer, and a 
modem. Everything but the monitor and the 
modem is plugged into a six-socket power strip, 
which in turn is plugged into a single wall outlet. 
The power strip has a 15-amp circuit breaker 
which has never popped. That means the system 
uses less than 1650-1800 watts, or a little more 
electricity than a blow dryer. 

By far the most power-hungry component of 
a home computer system is the TV set or mon¬ 
itor. A small black-and-white TV or monochrome 
monitor won't use much electricity, but a large 
color TV can use more power than the rest of the 
system put together. If you're worried about 
overloads, plug the TV into a different outlet. 

One thing you should avoid is hooking up 
the computer system to a circuit shared by 
heavy-duty appliances like air conditioners, dish¬ 
washers, clothes washers, dryers, refrigerators, 
and water heaters. Have you ever noticed your 
room lights dim for a second when a heavy 
appliance kicks on? The sudden demand for 
power momentarily drains the circuit and lowers 


the voltage. Those kinds of fluctuations aren't 
healthy for computers, whose chips are very sen¬ 
sitive to power sags and surges. (That's why 
some people invest in surge protectors or voltage 
stabilizers.) 

If you aren't sure whether a certain wall out¬ 
let is wired to the same circuit as another outlet 
serving a heavy appliance, test it by plugging in 
a lamp. Then switch on some of the major appli¬ 
ances in your home while someone watches the 
lamp for any telltale dimming. If an outlet is af¬ 
fected, you may have to run an extension cord 
from a more distant socket to reach your com¬ 
puter system. This is particularly true in houses 
and apartment buildings with older wiring. 

Ql'm moving to another state and I'd like to 
transport my computer by plane. Do you 
think it would be safe in the baggage 
compartment? 

A Recently some of COMPUTERS editors went 
on a trip to the Comdex trade show in Las 
Vegas and witnessed some unpleasant violence 
to a Compaq transportable computer. Although 
the Compaq is one of the better transportables, 
by the time the poor computer tumbled off the 
airport conveyor belt onto the revolving baggage- 
claim carousel, it looked almost destroyed. The 
top of the case was tom off, exposing the built-in 
monitor screen and delicate disk drives. Heavy 
hard-shell suitcases kept sliding off the conveyor 
belt and bashing into the computer, knocking 
more parts loose. Wires and cables were hanging 
out. It wasn't pretty. 

Based on what we saw that day, and on 
other airline experiences, our advice is not to 
ship a computer as baggage unless it's very well 
packed and padded, preferably in its original box 
with the form-fitting Styrofoam inserts. Have you 
ever seen the TV commercial in which a suitcase 
is batted around by an ape? If your computer is 
packed well enough to withstand that kind of 
battering, you're probably safe. Otherwise, you 
might consider another method of shipping. 

Incidentally, if you're traveling by air with a 
computer as carry-on baggage, insist on having it 
hand-checked when passing through security 
checkpoints. We know of a newspaper reporter 
who unknowingly allowed his TRS-80 Model 
100 lap computer to suffer exposure from an air¬ 
port x-ray machine. "It just went crazy," he said.® 




NEWScrPROOUCTS 


Percussion 
Emulator For 
Apple 


Drum-Key, recently introduced 
by Peripheral Visions, Inc., is an 
electronic music interface board 
for use with the Apple II series 
of computers. It will allow you 
to interface stereos and electric 
instrument amplifiers to your 
computer. 

Drum-Key lets you com¬ 
pose, play, and record percus¬ 
sion sounds and riffs, as well as 
play along with the 100 in¬ 
cluded rhythm patterns and 26 

A complement of 28 sounds 
is included. Among these are 
snare, tom-toms, cymbals, cow¬ 
bell, tambourine, and six sounds 
made by conventional drum 
synthesizers. 

Suggested retail price is 
$139. 

Peripheral Visions, Inc. 

Great Valley Parkway 
Malvern, PA 19355 
(215) 627-3535 


or other interface. It requires no 
modifications of the computer or 
other peripherals. All circuitry is 
contained in an RS-232C type 
connector to minimize size. 

The R-Verter comes with a 
software package which in¬ 
cludes a smart terminal emu¬ 
lator and an RS-232C device 
handler. 


Most common RS-232C 
handshaking configurations are 
available using internal jumpers. 

Price for the R-Verter and 
print echo software is $49.95. 

Advanced Interface Devices, Inc. 

P.O. Box 2188 
Melbourne, FL 32902 
(305) 676-1275 



RS-232 Modem 
Adapter For Atari 

Advanced Interface Devices, Inc., 
has announced the R-Verter, a 
serial bus modem adapter for 
Atari 400, 600XL, 800, and 
800XL home computers. 

The R-Verter allows most 
modems and other RS-232C de¬ 
vices to be used directly with 
Atari computers without using 
the Atari 850 Interface Module 


Game 

Development 
Program For The 
Commodore 64 


Aspiring arcade-game designers 
can develop graphics for their 
games more quickly and easily 
by using the Graphics Master. 

Written for the Commodore 
64, this programming aid adds 
52 new commands to BASIC 


and has numerous features that 
support game development. 

Software Unlimited will 
soon release a compiler to make 
the completed game run faster. 

Disk only; $29.95._ (Please 
include $3.00 for postage and 
handling.) 

Software Unlimited 
P.O. Box 429 
Klamath Falls, OR 97601 













Educational And 
Entertainment 
Software For The 
TI-99/4A 


American Software has an¬ 
nounced four new software 
packages for the Texas Instru¬ 
ments 99/4 A. 

In Fireball, an arcade game 
for ages ten and older, you must 
climb a volcano without being 
hit by fireballs or falling into 
holes. The game requires either 
the Editor/Assembler cartridge 
or the Mini-Memory cartridge. 
Disk only; $16.95. 

Letter Fun helps preschool¬ 
ers learn the letters of the al¬ 
phabet using colorful graphics 
and music. The child can choose 
from three different learning 
levels. Speech Synthesizer and 
Extended BASIC are required. 
Cassette $19.95; disk $21.95. 

Try your luck at the horse 
racing track with American 
Derby. This game is set up to 
simulate the betting that would 
go on at a track, including vari¬ 
able track conditions, an in¬ 
sider's sheet, and realistic odds. 
You can bet on up to 36 differ¬ 
ent horses. Designed for ages 
ten to adult; up to six may play 
at a time. Requires Extended 
BASIC. Cassette $14.95; disk 
$16.95. 

Speed Read was written for 
adults who want to improve 
their reading speed. This pack¬ 
age of programs includes infor¬ 
mation on the reading process 
as well as pacing aids and read¬ 
ing passages to test your speed. 
It requires Extended BASIC. 
Cassette $29.95; disk $31.95 
(disk version requires memory 
expansion). 

American Software Design & 
Distribution Co. 

P.O. Box 46 

Cottage Grove, MN 55016 
(612) 459-0557 
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Home Educational 
Software For 
Apple, Atari, And 
Commodore 

Sunburst Communications, 
which has supplied educational 
materials to schools for 12 
years, has released three new 
products from their microcom¬ 
puter division. 

The Incredible Laboratory 
(ages seven to adult) uses the 
problem-solving strategy of trial 
and error and note-taking to 
discover what combinations of 
mysterious chemicals make up 
crazy monsters. Apple and Atari 
versions are available. 

Challenge Math (ages 6-11) 
lets children practice basic math, 
estimation, and problem-solving 
skills. Available for Apple and 
Commodore 64. 

Getting Ready To Read And 
Add (ages three to six) gives pre¬ 
schoolers practice in letter and 
number recognition. Available 
for Apple and Atari. 

Suggested retail price for 
each program is $39.95. 

Sunburst Communications, Inc. 
Pleasantville, NY 10570 
(914) 769-5030 


New 

Telecommunications 
Package For 
Apple 


The Networker modem, recently 
introduced by ZOOM Telephon¬ 
ies, is a complete telecommuni¬ 
cations package for the Apple II, 
II+, and lie computers. 

For $129, you get a single¬ 
slot, direct-connect, 300-baud 
modem, terminal software, and 
a free subscription to The 
Source. 

An enhanced version of the 
terminal software, Netmaster, 
can be purchased separately for 



Apple owners can get a complete 
telecommunications package, includ¬ 
ing modem and terminal software, by 
purchasing the Netmaster system. 

$79. If purchased with the 
Networker, the price of the en¬ 
tire package is $179. 

ZOOM Telephonies plans 
to offer a complete line of 
modems, including modems for 
the IBM-PC. 

ZOOM Telephonies 
207 South St. 

Boston, MA 02111 
(617) 423-1072 


Telecommunications 

Aid 


Source Telecomputing Corpora¬ 
tion (STC) has announced Apple 
Sourcelink, the second in its se¬ 
ries of communications software 
designed to supplement use of 
The Source by personal com¬ 
puter owners. 

The software is compatible 
with the new Apple modem, as 
well as with the Hayes and 
Transend modem products, and 
is designed for the Apple II, He, 
and 11+ with a minimum 48K 
of memory. 

It combines features such as 
automatic dial-up and sign-on 
procedure for Telenet, Uninet, 
and Sourcenet data communica¬ 
tions networks; "one-button" 
access to major services on The 
Source; simultaneous capture of 
data from The Source in the Ap¬ 
ple memory or disks, including 










a capture editor; and data trans¬ 
fer from Apple disks to The 
Source, or vice versa, while 

An additional feature al¬ 
lows Apple and IBM users to ac¬ 
cess automatically any number 
of predetermined services and 
data bases, once on-line. 

The Source . 

1616 Anderson Road 
McLean, VA 22102 
(703) 734-7500 


Inexpensive Light 
Pen For 
Commodore 
Computers 


Creative Electronics has an¬ 
nounced the introduction of a 
new light pen for the Commo¬ 
dore 64 and VIC-20. 

The light pen, which offers 
close to one-pixel accuracy for 
high-resolution graphics, comes 
with two sample programs. 

Both versions retail for 
$14.95. 

Creative Electronics 
P.O. Box 4253 
1714 Sandalwood 
Thousand Oaks, CA 91360 
(805) 492-1506 


Alphabet, Math 
Games For 
Children 


Two educational software games 
designed to help children under¬ 
stand the alphabet, multiplica¬ 
tion, and division have been 
introduced by Avalon Hill 
Game Company's Intelligence 
Quest Software division. 

DIVEX, appropriate for ages 
8-12, has three levels of multi¬ 
plication and division to master, 
and requires a child to use 
mathematical skills to protect 
his or her "land" from incorrect 
answers. 

It is available on diskette 


($21) for Ataris with at least 
32K memory. Cassette editions 
($16) for the Commodore 64 
and Atari will be available later. 

In ABC Caterpillar, the 
player, controlling a bright 
green caterpillar, searches for 
letters of the alphabet as they 
pass by on the screen. The goal 
is to find and gobble up the let¬ 
ters in alphabetical order. 

For children 3-8 years old, 
ABC Caterpillar is available for 
the VIC-20 at a cost of $16. A 
Commodore 64 edition is 
planned also. 

Intelligence Quest Software 
4517 Harford Road 
Baltimore, MD 21214 
(301) 254-9200 


New Data Base 
Management 
Software For IBM 
Home Computers 

Condor Jr. is a data base manage¬ 
ment system specially customized 
for beginning microcomputer 

The program is available for 
the IBM-PC and PCjr, and re¬ 
tails for $195. 

Beyond its extensive math 
and printing capabilities. Condor 
Jr. can be upgraded to Condor 3 
(a more sophisticated data base 
manager). Other features in¬ 
clude multilevel sorts and a va¬ 
riety of report generators. 

Condor 

2051 S. State St. 

Am Arbor, MI 48104 
(313) 769-2418 


New Speech 
Synthesizers 


Three new Voice Box speech 
synthesizers have been intro¬ 
duced by The Alien Group, two 
of which are designed for Apple 
II and Apple-compatible com¬ 
puters. The third is for any ma¬ 


chine which has a standard 
(RS-232C) serial port. 

Using a new speech chip, 
the programs produce speech 
directly from English text, add¬ 
ing inflection either automati¬ 
cally or according to numbers 
inserted by the user. All units 
have an unlimited vocabulary, 
and can speak with a male or 
female voice, fast or slow, or 
loud or soft, depending on what 
commands are added to the 
text. It is not necessary to mark 
syllable boundaries or to use 
phoneme spelling when adding 
intonation. 

The Voice Box 3m model, 
designed for the Apple, retails 
for $129. Voice Box 3i, also for 
the Apple, costs $219. Prices in¬ 
clude a Voice Box board, disk 
software, and external speaker. 

The Voice Box 3s, which 
can connect to any computer 
via the standard RS-232C serial 
interface, includes an integral 
speaker and retails for $269. 

The Alien Group 
27 West 2 3rd St. 

New York, NY 10010 
(212) 741-1770 



product submissions for publication. Readers 


edited version of material submitted by ven¬ 
dors and are unable to vouch for its accuracy 


COMPUTE! welcomes notices of up¬ 
coming events and requests that the 
sponsors send a short description, their 
name and phone number, and an address 
to which interested readers may write for 
further information. Please send notices 
at least three months before the date of the 
event, to: Calendar, P.O. Box 5406, 
Greensboro, NC 27403. _© 
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lUI I Y Machine Language Entry Program 

1VIL/V For Commodore 64 Charles Bran-'O'X Program Editor 













sss 


E*3[OFF)g*3£{RVS)£{RVS) 

{14 SPACES] 11 '; :rem 250 

0 PRINT“{RVS)[14 SPACESHRIGHT} Eg 3 
{RIGHT) {2 RIGHT) {0FF)£{RVS)£g*3 
{OFF)E*3{RVS)!l4 SPACEST"; :rem 35 
0 PRINT"{RVS){41 SPACES)" :rem 120 

0 PRINT"{2 DOWN){PUR)(BLK) MACHINE LANG 
UAGE EDITOR VERSION 2.01{5 DOWN)" 


0 PRINT"E53{2 UP}STARTING ADDRESS? 

{8 SPACES){9 LEFT)"; 

5 INPUTS:F=1-F:C?=CHR?(31-+119*F 


0 IFS<256OR(S>40960ANDS<49152)ORS>5 
THENGOSUB3000 SGOTO210 ;rem 

5 PRINT:PRINT:PRINT :rem 

0 PRINT"E5|{2 UPjENDING ADDRESS? 

{8 SPACES){9 LEFT)";:INPUTE:F=l-F 
CHR$(31+119*F) :re 

E<256OR(E>40960ANDE<49152)ORE>5 
ENGOSUB3000:G0T02 30 
- — E<STHENPRINTC$;"{RVS} 

{2 SPACES)":GOSUB1000:G 


m 237 


0 A=1:PRINTRIGHT?(" 


J):AD=S:POKEV+21,0 
30"+MID?(STR?(AD), 


GOSUB570:IFN=-1THENJ=J+N:GOTO320 

IFN=-206THENPRINT:INPUT"(DOWN)ENTER N 
EW ADDRESS";ZZ :rem 44 

IFN=-206THENIFZZ<SORZZ>ETHENPRINT" 
{RVS}OUT OF RANGE":GOSUB1000:GOTO410 

IFN=—206THENAD=ZZ:PRINT:GOTO310 


I PRINT: INPUT "DISPLAY :I?ROM" ;F: PRINT, "TO 
";:INPUTT :rem 234 

I IFF<SORF>EORT<SORT>ETHENPRINT"AT LEAS 
T";S;"{LEFT}, NOT MORE THAN";E:G0T043 
0 :rem 159 

I FORI=FTOTSTEP6:PRINT:PRINTRIGHT?("000 
0"+MID$(STR?(I),2),5);":"; :rem 30 

. FORK=0TO5:N=PEEK(I+K):PRINTRIGHT?{"00 


):IFA?="H"THENA?="0" :rem 134 

4 IFAV> 0THENA?=CHR?(48+AV) :rem 134 

5 PRINTCHR?(20);:A=ASC(A$):IFA=130RA=44 

ORA=32THEN670 :rem 229 

0 IFA>128THENN=-A: RETURN : rem 137 

0 IFAO20 THEN 630 : rem 10 

0 GOSUB690:IFI=1ANDT=44THENN=-1:PRINT" 
{OFFltLEFT] (LEFT)”;:GOTO690 :rem 62 
0 GOTO570 : rem 109 

0 IFA<48ORA>57THEN580 :rem 105 

0 PRINTA?;:N=N*10+A-48 :rem 106 

0 IFN>255 THEN A=20:GOSUB1000:GOTO600 

:rem 229 

0 Z=Z+1:IFZ<3THEN580 :rem 71 

0 IFZ=0THENGOSUB1000:GOTO570 :rem 114 

0 PRINT","; :RETURN :rem 240 

0 S%=PEEK(209)+256 * PEEK(210)+PEEK(211) 


0 PRINTLEFT?("{3 LEFT)", 1-1);:RETURN 
0 PRINT"{CLR)(RVS)*** SAVE ***{3 DOWN)" 

5 PRINT"{2 DOWN)(PRESS {RVS) RETURN (OFF) 
ALONE TO CANCEL SAVE){DOWN)":rem 106 
0 F$="":INPUT"{DOWN} FILENAME";F$:IFF$= 
""THENPRINT:PRINT:G0T0310 :rem 71 

0 PRINT:PRINT"{2 DOWN){RVS)T{OFF}APE OR 
')D{OFF}ISK: (T/D)" :rem 228 

« ' '■T'THEN740 

: rem 36 
IENF?="0: "+F$: 


{ .... 

0 GETA?:IFA? < >"T"ANDA? < > 


PRINT:G0T0310 


CKSUM=AD-INT(AD/256)*256:F0RI=1T06:C 
SUM=(CKSUM+A(I))AND255:NEXT :rem 21 
I PRINTCHR?(18);:GOSUB570:PRINTCHR?(14 


I PRINT:PRINT"LINE ENTERED WRONG : RE-E 
NTER":PRINT:GOSUB1000:GOTO310:rem 176 
I GOSUB2000 :rem 218 

I F0RI=1T06:POKEAD+I-1,A(I):NEXT:POKE54 
272,0:POKE54273,0 :rem 227 

I AD=AD+6:IF AD<E THEN 310 :rem 212 


):POKE782,ZK/256 :rem3 

2 POKE781,ZK-PEEK(782)* 256:POKE780,LEN( 

T?):SYS65469 :rem 109 

3 POKE780,1:POKE781,DV:POKE782,1:SYS654 

5 K=S:POKE254,K/256:POKE253,K-PEEK(254) 

*256:POKE780,253 :rem 17 

6 K=E+1:POKE782,K/256:POKE781,K-PEEK(78 

2)*256:SYS65496 :rem 235 

0 IF(PEEK(783)AND 1)OR(191ANDST)THEN780 

5 PRINT"{DOWN)DONE.{DOWN} ' 


0 PRINT"{DOWN)ERROR ON SAVE. 

RY AGAIN.":IFDV=1THEN720 :rem 171 

1 OPEN15,8,15:INPUT#15,El?,E2?:PRINTE1? 

;E2?:CLOSE15:GOTO720 :rem 103 

0 PRINT"{CLR){RVS)*** LOAD ***{2 DOWN)" 

5 PRINT"{2 DOWN)(PRESS {RVS) RETURN {OFF) 
ALONE TO CANCEL LOAD)" :rem 82 

0 F?=:INPUT"{2 DOWN) FILENAME";F?:IFF 
?='"'THENPRINT:GOTO310 : rem 144 

0 PRINT:PRINT"{2 DOWN){RVS)T(OFF)APE OR 
{RVS}D{OFF}ISK: (T/D)" :rem 227 

0 GETA?:IFA?<>"T"ANDA?<>"D"THEN820 


:GOTO310 


830 DV=1-7*(A?=" 


570 N=0:Z=0 


1(54)-LEN(T? 




841 POKE781,ZK-PEEK(782)* 256 s POKE780,LEN( 
T$);SYS65469 :rem 107 

845 POKE780,1:POKE781,DV:POKE782,1:SYS654 

850 POKE780,0:SYS65493 :rem 11 

860 IF(PEEK(783)AND1)OR(191ANDST)THEN870 

865 PRINT"{DOWN}DONE.":GOTO310 :rem 96 
870 PRINT"{DOWN}ERROR ON LOAD.{2 SPACES}T 
RY AGAIN.{DOWN}":IFDV=1THEN800 

880 OPEN15,8,15 sINPUT#15,El$,E2$:PRINTE1$ 
;E2 $:CLOSE15:GOTO800 :rem 102 

1000 REM BUZZER srem 135 

1001 POKE54296,15:POKE542 77,45:POKE54278, 


CAPUTE! 

Modifications Or Corrections To Previous Articles 


Atari XL Compatibility Update 

Upon testing with our new 800XL, we have been 
pleased to discover that the vast majority of our 
previously published Atari programs will run 
without modification. Of the few programs that 
will not run as is, almost all, including the popu¬ 
lar "Scriptor" word processor (April 1983), op¬ 
erate properly when used with the Atari Trans¬ 
lator. This program, available on a disk (DX5063) 
from Atari, enables most programs written for 
the older Ataris to be run on the new XL models. 
So far we have discovered only two programs, 
"Demons Of Osiris" 0anuary 1984) and "Ski" 
(February 1983), that the Translator cannot cure. 
These programs can be run on the new computers 
only if you have a BASIC cartridge from the 
older Atari series to plug in. 

For information on obtaining the Translator 
disk, call Atari's Customer Relations Department at 
800-538-8543 (inside California, 800-672-1404). 

MLX For Commodore 64 

There is an error in the article accompanying the 
"MLX" machine language editor program in the 
March and May issues. The article states, "If you 
enter less than three digits, you can press either 
the comma, SPACE bar, or RETURN key to ad¬ 
vance to the next number." However, when the 
numeric keypad feature was added to MLX, the 
comma key was redefined as the numeral 2. As a 
result, the comma key can no longer be used to 
advance to the next number; however, the SPACE 
bar and RETURN key still work as stated. 

A number of readers have expressed concern 
at the number of revisions to MLX since it was 
first published. These changes generally repre¬ 
sent enhancements, not corrections. Any version 


165 :rem 207 

1002 POKE54276,33 SPOKE 54273,6:POKE54272, 

5 : rem 42 

1003 FORT=1TO200:NEXT : POKE54276,321POKE54 

273,0:POKE54272,0:RETURN :rem 202 

2000 REM BELL SOUND :rem 78 

2001 POKE54296,15:POKE54277,0:POKE54278,2 

2002 POKE 54276,17:POKE54273,40:POKE54272 

2003 FORT=1TO100:NEXT:POKE54276,16:RETURN 

:rem 57 

3000 PRINTCS;"{RVSlNOT ZERO PAGE OR ROM"! 
GOTO1000 :rem 89 

© 


of MLX may be used to type in any program for 
the 64 presented in MLX format, regardless of 
whether the program is from COMPUTE!, COM¬ 
PUTED'GAZETTE, or a COMPUTE! book. The only 
version of 64 MLX known to contain a bug is the 
one from the March issue, and the correction was 
given in the May "CAPUTE!" column. 

Automatic Proofreader For The 64 

The final paragraph of the article which 
accompanies the "Automatic Proofreader" pro¬ 
gram each month indicates that on the 64 the 
Proofreader can be protected during tape LOADs 
and SAVEs by typing POKE 178,165. Richard 
Murphy points out that the proper value to pro¬ 
tect the Proofreader is POKE 178,251. This POKE 
is not necessary for disk operations. 

64 Hi-Res Screen Printing 

Many readers have asked for a way to print a 
copy of the elaborate designs they create with 
the "3-D Plotting" program from the May issue 
(p. 58). Reader Henry Mervis observes that, for 
Commodore 64 owners, the solution is in the 
same issue, in the "Hi-Res Graphics Editor" pro¬ 
gram (p. 82). To create a hard copy of the results 
of the 3-D Plotting programs (or of almost any 
other hi-res screen display), load the machine 
language program you created for the Hi-Res 
Editor (Program 2, p. 80), using the LOAD com¬ 
mand format described on page 82. Remember to 
enter the line to move the BASIC memory area: 

POKE 642,128:POKE 44,128:POKE 32768,0:NEW 

Next, load either "Rectan" (Program 1, p. 

60) or "Spheri" (Program 2, p. 62). For Rectan, 
change line 600 to read 600 SYS 49152; for 
Spheri, change line 610 to 610 SYS 49152. Then 
RUN the program in the normal manner. When 
your design is complete, a rectangle will appear 
on the screen. Turn on your printer and press the 
P key and your design should begin to print. 

The screen dump routine will work only on 
a Commodore 1525 printer or with an interface 
that emulates the 1525. The routine will not 
work with Commodore 1526 printers. © 
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CARDCO “NOW” SOFTWARE 

available now for your Commodore-64 T “and more! 


300 S. Topeka Wichita, Kansas 67202 (316)267-6525 

“The world’s largest manufacturer of Commodore accessories.” 
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